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PREFACE 


This manual contains a comprehensive description of PDP-ll 
Bastc?. As implemented on the PDP-11l, BASIC has a few limita- 
tions offset by a number of special features which provide added 
power and flexibility. Among the latter is a particularly strong 


debugging capability. 


For those who plan to learn BASIC from this manual, numerous 
examples are provided to fully illustrate the use and operation 
of each BASIC statement. The knowledgeable BASIC user can turn 
to Appendix A for a summary of the differences from and exten- 
sions to Dartmouth BASIC. Appendix B summarizes PDP-11l BASIC's 


command structure, and Appendix D gives loading instructions. 


A knowledge of computers is not prerequisite to the efficient 
use of BASIC. However, a knowledge of binary notation is required 
to load the BASIC program into the PDP-11l (see Chapter 7). 


PDP-11 BASIC can be used in a minimal PDP-1l system: 4K 


words of core memory and a Teletype. * 


For a more elementary description of the BASIC language, 
see BASIC Programming, by Kemeny & Kurtz, published by John Wiley 


& Sons, Inc., New York. 


IBASIC is a trademark registered by the Trustees of Dartmouth 
College, New Hampshire. 


-Teletype is a registered trademark of the Teletype Corporation. 
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CHAPTER 1 


INTRODUCTION TO THE MANUAL AND BASIC OPERATIONS 


1.1 LOADING DATA 


PDP-11 BASIC is an on-line, conversational program for use 

from the Teletype (terminal) keyboard, in a paper tape environ- 
ment. It can be run in the minimal 4K configuration. Any addi- 
tional core storage can be utilized for user program storage. If 
BASIC is not in core, directions for loading and responding to 


its initial dialogue can be found in Chapter 7. 
After the initial dialogue has been completed, BASIC prints 


READY 


to indicate that it is in command mode. At this point the user 


can begin to type in his program. 


After performing user services, such as printing data on 
the terminal printer or punching out or reading in user programs 


On paper tape, BASIC returns automatically to command mode. 


1.2 THE BASIC LANGUAGE 


BASIC statements are explained, beginning in Chapter 2, along 
with the rules of BASIC syntax. Throughout the text, simple 
examples have been used in an effort to illustrate clearly the 
operation of each statement. A number of useful sample programs 
are furnished in Chapter 9 and have been annotated to explain 


program logic and the working of certain BASIC statements. 


1.2.1 Documentation Conventions 


Certain conventions are used throughout the manual in clarifying 


examples of BASIC syntax. 
a. Angle brackets indicate essential elements 
of the statement or command being described: 
LET <variable> = <expression> 


b. Square brackets indicate a choice among two 
or more possibilities: 


THEN <statement> 


IF <formula> | THEN <line number> 
GOTO <line number> 


La 


c. Braces indicate optional matter or a choice 
among optional elements: 


PRINT {list} 


Items in lower case print, such as list under item c, above, 
are supplied by the user, according to rules explained in the 
text. Items in capitals, such as THEN and GOTO under b, above, 


must appear exactly as shown. 


d. User input (from the keyboard) to a running 
program is underlined whereas program print- 
out is not underlined. 


1.2.2 Deferred and Immediate Modes 


BASIC programs are most frequently written in deferred mode, that is, 
with a number preceding each line to indicate its sequence in the pro- 
gram. In this mode, statement execution is deferred until a specific 


command (e.g., RUN or GOTO) is typed. In deferred mode the program is 


stored in core memory where it can be edited, debugged, run, rerun, and, 


if desired, saved on paper tape for future use. 


One of the special features of PDP-11l BASIC is that certain 
statements can be typed without the usual preceding line number. 
Without a line number, the statement is executed when the RETURN 
key is typed at the end of the line. The result of the computa- 
tion is stored for subsequent use, but the statement by which 


the result was obtained is lost. 


This mode of operation is referred to as immediate, and 
is useful when BASIC is to serve as a quick calculator. Imme- 
diate mode is especially useful in debugging deferred (stored) 
programs. It can be used, for example, to duplicate and test 
certain computational statements, and to print the value of 


variables at various stages of program execution. 


1.3 KEYBOARD ERROR CORRECTION 


Since the keyboard is used for input, typing errors may occur. To ex- 

punge unwanted characters from a line being typed, press the RUBOUT 

key once for each previous character to be deleted. To replace the en- 
tire line being typed, type CTRL/U (i.e., hold down the CTRL key while 
typing the U key; the slash in CTRL/U is shown merely to tie the opera- 
tions together) then begin again. Input lines are terminated with the 

RETURN key. If the RETURN key is typed before a typing error is dis- 


covered, the line must be edited as described in Section 1.4 below. 


d= 2 


1.4 PROGRAM EDITING 


Programs being created from the keyboard, or those which have 
been written previously and read in from paper tape, can be edited 


in line-oriented fashion. 


To change or correct a line, simply retype its line number 


and then the desired statement. For example, the line 
40 PRINT A 

can be replaced by typing 
49 GOTO 2e06¢ 


The PRINT statement would no longer exist; its place would be 


occupied by the GOTO statement. 


To delete a line, type the line number followed by the RETURN 
key 


10 <<RETURN key> 
or use the DELETE command. For example, 
DELETE 166 
will delete line number 1@. 
DELETE 5s 4@ 
will delete lines 5 through 49. 
DELETE: dy olo tl 
will delete the entire user program. 


1.5 ERROR MESSAGES 


As user programs are typed in and executed, an error message may 
appear on the teleprinter as the result of a typing error, badly 
formatted or missing statement, etc. The message will appear 


as follows: 


ERROR xxx AT LINE yyy 


where xxx represents an error code and yyy represents the line number 
of the line containing the error. All error codes are explained in 
Chapter 6. 


1.6 SPECIAL FUNCTIONS 

BASIC contains a number of special functions which perform specific 
mathematical operations. It is not necessary, for example, to create 
an original program to find the cosine of a given angle. The BASIC 
mathematical function COS followed by a parenthesized argument (angle) 
will compute this value automatically for the given angle. BASIC's 


mathematical functions are described in Chapter 4. 


1.7 SPECIAL FEATURES OF PDP-11 BASIC | 
PDP-11 BASIC has a number of added features, as compared with standard 
Dartmouth BASIC, which make it simpler to use and which are especially 
helpful in debugging user programs. These features are noted through- 


out the text and listed along with BASIC's limitations in Appendix A. 


CHAPTER 2 


BASIC VOCABULARY AND SYNTAX 


Figure 2-1 (on next page) will serve to illustrate some BASIC 
fundamentals. The program (lines numbered 1 through 299 in 
Figure 2-1) is a typical BASIC program. The REMARK statement 
in the first line (line 1@) and the printed results (following 
the command RUN) indicate that the program computes and prints 


interest payments. 


2.1 LINES 


Each line of the program begins with a number and is terminated 
with the RETURN key which is non-printing. The line number must 
be an integer from 1 to 8191. Statements are executed in the 
ascending order of their line numbers regardless of the sequence 
in which they appear. To allow later insertion of new lines, it 


is advisable to number lines by fives or tens. 


Notice in Figure 2-1 that each line number is followed by a 
word indicating what BASIC is to do or how it is to handle the 
data that follows the word. There are various types of BASIC state- 
ments, each is identified by the word which introduces the statement 


(LET, FOR, IF, DEF, etc.). 


All BASIC statements and computations must be written ona 
Single line; they cannot be continued onto a following line. 
However, more than one statement may be written on a single line 
when each statement after the first is preceded by a colon. 
(Multiple statement lines are a special feature of PDP-1l BASIC.) For 


example: 


10 INPUT A»sBsC 
is a Single statement line, whereas 


20 LET X=11: PRINT X5YsZ:3 IF X=A THEN 14 


is a multiple statement line containing three statements: LET, PRINT, 
and IF. Most statements may be used anywhere in a multiple state- 


ment line; exceptions are noted in the discussion of each statement. 


1@ REMARK == PROGRAM TO COMPUTE INTEREST PAYMENTS 
26: ‘PRINT “INTEREST: IN PERCENT ss -INPUT. J 

26 LET J = J/100 

30 PRINT "AMOUNT OF LOAN'TS 3s INPUT A 

4Q@ PRINT "NUMBER OF YEARS"'3: INPUT N 

58 PRINT “NUMBER OF PAYMENTS. PER YEAR™s s INFUT M 
60 LET N = N*M 

65° LET) =: J/M 

(C.bET B= 11 


75 LET R = A*I/C1-1/7BIN) 

1& PRINT 

6@ PRINT “AMOUNT PER PAYMENT ="3 R 

So. oPRIN ET “PO-Tal INTEREST ="5 REN-A 
66 PRINT 


96 LET B= A 

95 PRINT. “ INTEREST 
100 LET L = B*I 

110 LET P = R-L 

120: LET “B= B= P 

LSU PRINT dso Ps. -B 
14Q0 IF B>=F GOTO 190 
15@ PRINT B*Is R-B*I 
160 PRINT "LAST PAYMENT =" B*I+B 
260 END 


APP TO PRIN BALANCE" 


RUN 

INTEREST IN PERCENT? 9 

AMOUNT OF LOAN? 2580 

NUMBER OF YEARS? 2 

NUMBER OF PAYMENTS PER YEAR? 4. 


AMOUNT PERK PAYMENT = 344-9615 

TOTAL. -INTERES | 259-6941 
INTEREST APP TO PRIN BALANCE 
56025 286+e7115 2ell-2ss 
49275399 295+2075 1916-081 
A3e-111682 301-8497 1614-231 
36+ 3282 306+6413 130559 
eezesloll G1 5856.57 996-8043 
eaetelet 322+ 6864 667+ 3178 
15-@1465 329-9469 337+ 371 
Te¢S9OOKAT 337+ 3707 


LAST PAYMENT = 344-9618 


STOP AT LINE —“200 
READY 


Figure 2-1. A BASIC Program with Results 


2.2 REMARK STATEMENT, REM 


The REMARK statement is used to insert notes and comments in user pro- 


grams. Any legal character (see Appendix C) may appear in a REMARK 


statement. 


The word REMARK can be abbreviated to REM. 


It is often useful to put the name of the program and informa- 
tion on what it does in a REM statement at the beginning. Remarks 
throughout the body of a long program will help later debugging by 


explaining the functions of various sections of the program. 


REM statements have no effect on the running of the program. 
They do, however, take up storage space which can be critical in 


small memory configurations. 


When used ina multiple statement line, the REM statement 


must be last since BASIC ignores everything on a line after REM. 


2.3 STOP AND END STATEMENTS 


The program in Figure 2-1 concludes with an END statement. The 
END statement should be included in programs intended for long 
term use. It assures that they can be executed in other than 


the single user BASIC environment. 


The END statement must be placed at the end of the program, 
i.e., it must have the highest line number of any program state- 


ment. 


STOP statements can be used anywhere in a program to terminate 
program execution; they mark the logical places for program termina- 


tion rather than the physical end of the program. 


A program intended only for temporary use can be written 
without an END or STOP statement as a terminator; it will termi- 


nate normally at the highest numbered line. 


STOP is useful in debugging user programs. It can be placed 
at critical points in the program so that during execution the 
program will halt at these points. At the halt, PRINT can be used 
in immediate mode to examine the value of specific variables. If 
program execution appears correct at that point, execution may be 
continued with an immediate mode branch to the statement following 
STOP (see GOTO, Section 3.10), or the STOP statement may be deleted 


and the program restarted using RUN. 


Z.4 RUN COMMAND 


When the user program has been typed in deferred mode, as in 


Figure 2-1, it is ready for execution with the RUN command. 


When the RUN command is issued, BASIC executes the program. 
If a fatal error is detected, execution is halted and an error 
message is printed. If an error is non-fatal, an error message 


is printed and program execution is continued. 


2.5 DATA INPUT 


Following the RUN command in Figure 2-1 (after line 200) four 
questions appear followed by question marks. The questions re- 
sult from the PRINT statements at lines 20, 30, 40 and 50. The 
question marks result from the INPUT statements at the end of 


these multiple statement lines. 


The numbers appearing after the questions (underlined for 
documentation purposes) were typed by the user. How to input 
to and output from a running user program is described in Chap- 


ter 3. 


2.5.1 Constants 


BASIC accepts constants expressed as integers, decimal numbers, 
or in exponential format, i.e., a decimal number times some 
power of ten, such as 23.4E2 which is equivalent to 2340. The 
E can be read as "times ten to the _th power", where the power 


is specified by the number following the E. 


The following rules apply to numbers in exponential format. 


1. The exponent may be unsigned if positive 
(1234.56E 3). A negative exponent must 
be signed, e.g., 1234.56E-3. 


2. The exponent must be in the range -9899 
to +9899. 


Results of computations are printed out as integer or deci- 
mal numbers when the result will fit in nine spaces, 1.e., seven 
digits plus a sign (space when positive) and a decimal point. 
Outside this range they are printed out in exponential or E 
format in a maximum of fifteen characters, i.e., sign (if nega- 
tive) or space, decimal point plus seven significant digits, 

E symbol, sign or space, and exponent of up to four digits. 
Shown below are some user-sSupplied values with their equivalents 
aS printed out by BASIC. 


Value Typed In Value Printed by BASIC 


fl 61 

9. 9D PDPBVE-3 9999 
9999999 9999999 
1. PPP PPPES 1PPPPBP 
2.718281828459945 2.718282 
- PCPPPPVGG36218 .36218E-9 


2.5.2 Variables 


A variable is a symbol which represents a number. It is formed 
by a Single letter or a letter followed by a single digit. For 


example: 
I B3 X C8 


Variables are used in the program where actual values are 
not known when writing the program and where certain values are 


expected to change. 


2.5.3 Expressions 


Expression, when referred to throughout the manual, implies a 
constant, a variable, or combination of either or both separated 


by arithmetic operators and parenthesized, if necessary. Example: 
A+B-4/C*1.2+7/ (1+A) 


Table 2-1 below lists the symbols used to indicate arithme- 
tic operations in BASIC expressions. Section 2.5.4 explains the 


rules under which BASIC expressions are evaluated. 


2.5.4 Evaluation of Expressions 


In evaluating expressions, BASIC performs arithmetic operations 
in the order of priority indicated in Table 2-1. Parenthesized 
portions of expressions are evaluated first. Nested parenthe- 
sized groups are evaluated beginning with the innermost grouping, 


working outward. 


TABLE 2-1 
Arithmetic Operators 
Symbol in Algebraic Prior- 
BASIC Example Notation it Function 
+ (SHIFT/N) : Exponentiation 


(raise A to the 
pth Seay 


Multiplication 


Division 
Addition 


Subtraction 


In must be positive and non-zero. See Appendix a, Section 7. 
{ 


Through the use of parentheses the order of priority of 
arithmetic operations, and the final value of an expression, 


can be changed. 
This can be shown by evaluating the following expressions, 
which are alike except for the inclusion of parentheses in the 


second: 


1) A*Bt24+C/2 
2) <A*((Bt2+C) /2) 


Letting A=7, B=2, and C=4 we get: 
1) 7*2t2+4/2 


Evaluating according to BASIC's rules we get, in succesSive steps: 


7*44+4/2 then 
28 + 2 and finally 
39 


The second expression yields: 


2) 7* ((2t2+4) /2) then 
7* ((4+4) /2) then 
7* (8/2) and finally 
28 


2.5.5 Arithmetic Functions 


In addition to constants and variables, the call names of BASIC 
arithmetic functions - SIN(X), COS(X), LOG(X), etc., as described 
in Chapter 4, can be used as expressions or elements of expres- 


sions. The external function EXF(X), as described in Chapter 8, may 


also be used in this manner. 


CHAPTER 3 


COMPUTATIONAL, DATA INPUT AND OUTPUT, AND LOGICAL STATEMENTS 


3.1 LET STATEMENT 


The LET statement is used to assign a value to a variable. The 


general format of the LET statement is: 
LET <variable> = <expression> 


The following four statements illustrate two forms of the LET 


statement. 


10 LET A=1 

c@ LET B=e 

30 LET C=A+1 

40 LET X=A+B+C+t1 


When these statements are executed, the value of X at line 40 will be 


14+2+2+1 or 6. 


The LET statement can be used anywhere in a multiple state- 


ment line. 


3.2 PRINT STATEMENT 


The PRINT statement is used to output (print) data on the tele- 


printer. The general format of the PRINT statement is: 
PRINT {list} 


where the list may consist of an expression, a text string, or 


both. As the braces indicate, the list is optional. 


The PRINT statement alone: 
20 PRINT 


may be used to roll the teleprinter platen, inserting a blank line 


in the program printout. 


PRINT statements can be used to perform calculations: by 
evaluating the expression contained in the list and printing 


out its constant value. The value resulting from the computa- 


tion is printed out but not retained for use in subsequent state- 
ments. The preceding example (Section 3.1) could have been written 
as follows, substituting a PRINT statement for the final LET state- 
ment to obtain printed results: 

10 LET A=1 

e®@ LET B=e 

3@ LET C=A+1 

4Q@ PRINT A+B+t+Ctl 


RUN 
6 


STOP AT LINE AQ 
READY 


The PRINT statement may be used anywhere in a multiple state- 


ment line. 


3.3 FORMATTING PRINTOUT 


By placing a comma after the expression in the PRINT statement, 
subsequent values will be printed on a single line, as the fol- 


lowing example demonstrates. 


10 LET A=5 

20 FOR B=1 TO 5 
30 PRINT A+B» 
4Q@ NEXT B 


RUN 
6 it 


STOP AT LINE 4@ 
READY 


BASIC formats the Teletype print spaces into five print 
zones of 14 spaces each. When an item in a PRINT statement 1s 
followed by a comma, the next value to be printed will appear 


in the next available print zone. 


If the PRINT statement contains several items (e.g., constants 


and variables), inclusion of an extra comma between two items causes 


a print zone to be skipped. For example: 


30 LET A=l: LET B=e: LET C=3 
4Q PRINT As»BsCo1e4 


RUN 
1 2 3 


STOF AT LINE AQ 
REA DY 


If the last item in a PRINT statement is followed by a 
comma, the next value to be printed will appear in the next 
available print zone, even though it is in a separate PRINT 


statement. For example: 


tO LET Be bhs LET -Be2: LET -C=3 
eG PRINT As 
36 PRINT B 
4Q@ PRINT C 
RUN 
1 a 
3 


STOP AT LINE AQ 
REA DY 


If a tighter grouping of printed values is desired, the 
semicolon can be used in the same manner as the comma. It will 
cause each value to be printed two spaces to the right of the 
preceding printout. A semicolon following the last item 
in the list will cause the next printed value to appear 
two spaces to the right of the preceding value on the same 
print line (provided the end of the print line has not been 
reached). The following example shows various uses of the semi- 
colon and the comma. 

10 DATA 13253 
e®@ READ A>B;C 
3@ PRINT A3;B3C;5 
AQ PRINT A3sB3C 


5@ PRINT AsBsC 
60 PRINT As3BsC 


RUN 
Le ar ke ES 
1 re 3 
1 rad 3 


STOP AT LINE 66 
READY 


3.4 CHARACTER STRINGS AND EXPRESSIONS IN PRINT STATEMENTS 


The PRINT statement may be used to print a message, comment, or 
any string of characters. This is done by delimiting the characters 


to be printed with quotation marks. For example: 


'O PRINT “THIS. Ds & TEAT STRING" 
RUN 
THiS: LS A TEXT STRING 


STOP AT LINE 1Q 
READY 


A single PRINT statement can be used to print character 


strings and computed values. For example: 
4A® PRINT "AVERAGE GRADE IS " X 

would cause BASIC to print the following (where X=83.4): 
AVERAGE GRADE IS 63-4 


When a character string is printed, only the characters be- 
tween quotes appear; no leading or trailing spaces are added. 
Leading and trailing spaces may be added within the quotation 
marks using the keyboard space bar. They will appear in the 


printout. 


When a comma is separating a text string and a following 
PRINT list item, the following item is printed beginning at the 
next available print zone. Semicolons separating text strings 
and other items are ignored. However, a semicolon appearing as 
the last item of a PRINT list will always suppress the line feed/ 
carriage return. In the following example the 2 printed in line 
30 immediately follows the "Z" text string in line 20. The space 
separating the Z and the 2 is the sign space; if X equalled minus 
two, the minus Sign would appear between the Z and 2 without a 


space. 


1Q@ LET X=e 

CO PRINT "GRADE''s "46"%353535 72" 
30 PRINT X 

RUN 

GRADE AGZ 2 


SLOP AT LN 30 
READY 


Any algebraic expression in a PRINT statement will be evalu- 
ated with the current values of the variables and the result will 
be printed. For example: 


S LET A=78+-&6 

1@ PRINT “THE RESULT 1S" AQ*10+23-.62-A 
RUN 

THE RESULT IS 344.96 


STOF AT LINE 1@ 

READY 
The above demonstrates the omission of the format control charac- 
ters following a text string, as well as the ability of the PRINT 


statement to print text and perform calculations. 


3.5 FOR AND NEXT STATEMENTS 


The FOR and NEXT statements are used to mark the beginning and 
ending points of program loops. Any statements between the FOR 
statement and its corresponding NEXT statement will be executed 
repeatedly according to conditions supplied within the FOR state- 


ment. 


The general format of the FOR statement is: 


FOR<variable>=<expression>TO<expression>{STEP<expression> } 


The general format of the NEXT statement is: 


NEXT<variable> 


The variable following FOR in the FOR statement is referred 
to as the "control variable". The same variable must appear in 
the NEXT statement which defines the end of the loop. 


The upper and lower values represented by the expressions 
preceding and following TO in the FOR statement are referred to 
as the "range" of the control variable. Each value within the 
range iS computed and assigned to the control variable for one 


iteration of the loop. 


The following example illustrates the FOR-NEXT statement 


and the formation of a program loop. 


1@ LET A=5 

ae. OR. B= i- “10.5 
38 PRINT A+B 

40 NEXT B 


58 <next statement> 


In line 20 the variable B is assigned the values l, 2, 3, 4, 
and 5. Since it cannot have each of these values simultaneously, 
a loop is formed beginning with the FOR statement at line 20 and 
ending with the NEXT statement at line 40. The statements within 
the loop are re-executed five times, each time with a new value 


of B. The NEXT statement causes repeated jumps to line 20 until 
B reaches its final assigned value of 5. When these statements are 


executed, BASIC prints the values 6, 7, 8, 9, and 10. When B 
reaches its ultimate value of 5, control passes to whatever statement 


may follow line 40. 


Each FOR statement within a program must be succeeded by a 
NEXT statement; NEXT cannot be used without a preceding FOR state- 


ment. 


3.5.1 Use of STEP 


In the preceding example, line 29 could have been written 
CO FOR B=1 TO 5 STEP 1 


The STEP modifier is optional when the step value desired is 
+1. It is required when the step value desired is other than +l, for 


example: 


10 FOR A=1 TO & STEP @ 
C® PRINT A 

30 NEXT A 

4G <next statement> 


When these statements are executed BASIC prints the initial value 
of 1, then adds 2 to arrive at the next value, etc. It will 
print out 1, 3, 5, and 7, then program control will revert to 


line 48, the next statement outside of the loop. 
A negative step value is legal: 


10 LET A=5 
20: POR Maa. TO: J. STEP =1 
36 PRINT M 
4Q NEXT M 


When executed these statements will print the values 5, 4, 
3, 2, and l. 


For positive step values, the loop is executed as long as 
the control variable is less than or equal to its final value. 
For negative step values the loop continues as long as the con- 


trol variable is greater than or equal to its final value. 


If the initial value is greater than the final value and 
a positive step is indicated, or if the initial value is less 
than the final value and a negative step value is indicated, the 


body of the loop is not executed. 


The FOR and NEXT statements can be written in a multiple state- 
ment line, provided: FOR is the first statement on its line, and 


NEXT is the last statement on its line. 


3.5.2 Control Variable Value 


The initial and final values of the control variable are computed 
only once — upon initial entry to the FOR loop. The control vari- 


able value can be modified within the loop. 


Upon exit from the loop, the control variable retains the last 


value used within the loop, as shown in the following program. 


5° REM =~ TEST POR GONTROL VARIABLE VALUE 

© REM «= AT EXPT FROM VrOR™ LOOP 

10 FOR A=1 TO 8 STEP @ 

20 PRINT As 

38 NEXT A 

33: REM. - NEXT STATEMENT IS OUTSIDE THE LOOP. 
34 REM - IT PRINTS FINAL COMFUTED VALUE OF 
35 REM - CONTROL VARIABLE "A". 

48 PRINT : PRINT A 


STOP AT LINE 4@ 
READY 


When the variable is tested with the PRINT statement at 
line 40, outside of the loop, it is found to have a value of 7. 
The program above stopped at line 40, as is indicated by the 


message STOP AT LINE 49. 


3.5.3 Nested FOR Statements 


FOR statements can be nested to allow the programming of loops within 


loops, as shown below. 


10 FOR A=1 TO 5 

29 FOR B=2 TO 18 STEP 2 
30 LET X=A + B 

4Q@ NEXT B 

50 NEXT A 

S55 PRINT X 


RUN 
LS 


STOP AT LINE 25S) 
READY 


Lines 20 to 40 are executed 25 times -- five times for each 


value of A in line 10. 


Correct nesting of FOR loops is diagrammed below. 


FOR outer loop 
FOR nested loop 


_ 


NEXT 


All statements of a nested loop are executed after the FOR 
statement of the outer loop and before the NEXT statement of the 


outer loop is encountered. 


Additional levels of nesting are possible. However, deep 
nesting is costly in terms of working storage (see Appendix A 
for specific data on storage requirements). For a practical 


example of nested loops, see Section 3.12.3. 


3.6 DATA and READ Statements 


In previous examples, LET statements have been used to assign 
constant values to single variables; if more variables were needed, 
more LET statements were included. However, in programs requir- 
ing many variables and constant values, READ and DATA statements 
should be used. 


The DATA statement introduces a numeric constant, or a series 
of constants, into a program. READ associates variable names se- 


quentially with the constant values supplied by DATA statements. 


READ and DATA statements must accompany one another in user pro- 
grams, but they need not be paired. If nine variables appear in one 
Or more READ statements, there must be at least nine constants in one 


or more DATA statements (see Section 3.7 for the exception). 


In the following example, all data is introduced in a single 
DATA statement. It is used at separate points in the program by 


two READ statements. 


10 DATA 1355335739 
26 READ A>B 

38 LET X = A+tB 

4@ PRINT AsB;X 

5@ READ VsQ>5R 

60 LET X = X+V+Q+R 
76 PRINT 

6@ PRINT X5VsQ>sR 


RUN 
1 5 6 
25 3 i 9 


SLOP AT -LINE 8@ 
READY 


In executing the above program BASIC ignores the DATA state- 
ment until it encounters a READ statement. It then goes back to 
the lowest numbered statement line of the program to search for 


a DATA statement. Above, it finds one at line 10, the first line 


of the program. 


Taking constant values sequentially, it associates them with 
variables in the READ statement, also taken sequentially: A is 
assigned a value of 1, and B of 5. Establishing a pointer at 


the next data element, 3, it reverts to line 3%, the next unexecu- 


ted statement. 


In line 30 a new variable, X, is introduced with a LET state- 


ment and given a computed value of 6. 


At line 50 another READ statement is encountered containing 
three new variables. This time BASIC does not search for the 
DATA statement but refers to its pointer to obtain the next unused 
data element. Variables V, Q, and R are assigned the constant values 


3, 7, and 9. 


In line 60 a computation is performed and in line 70 the 
latest computed value of X and the assigned values of V, Q, 


and R are printed. 


(Note that X in line 60 retains its computed value from 


line 30. Line 60 is evaluated as X=6+3+7+9.) 


Several error messages are associated with DATA and READ 
statements; see error codes 19, 20, 21, and 123 in Chapter 6. 
With regard to 123, each variable in a program must be ina 
READ statement, in a LET statement to the left of the = symbol, 
or in a FOR statement prior to use in an expression or PRINT 


list. 


The DATA statement cannot be included in a multiple state- 


ment line; it must be the only statement on a numbered line. 


The READ statement may be placed anywhere on a multiple state- 


ment line. 


3.7 RESTORE STATEMENT 


The RESTORE statement makes it possible to recycle through DATA 
statements beginning with the lowest numbered DATA statement in 


a program. For example: 


4Q@ DATA 132 
59@ READ A>B 
68 PRINT AsB 
10 RESTORE 
80 READ CsD 
9@ PRINT CsD 


RUN 
l eo 
1 2 


STOP AT LINE 9@ 
READY | 


The RESTORE statement at line 70 allows the READ statement at 
line 80 to obtain values from the DATA statement, even though the 
same values were used previously in the READ statement at line 
50. Without the RESTORE statement an error message, indicating 


lack of data for the READ statement, would have occurred at 


line 80. 


In the following program, the RESTORE statement causes the 
second READ statement, at line 60, to take constant values from 
the first DATA statement, at line 10, rather than from the second, 
at line 50. | 


10 DATA 132 
CO READ A>B 
30 PRINT A>B 
40 RESTORE 
596 DATA 354 
66 READ C3D 
70 PRINT CsD 


RUN 
1 ras 
1 2 


STOP AT LINE 70 
READY 


The RESTORE statement may be used anywhere in the program -- 


on a line by itself or anywhere in a multiple statement line. 


RESTORE has no effect in programs without DATA and READ 


statements. 


3.8 INPUT STATEMENT 


This statement is used to enter data from the keyboard while the 
program is running. The data is typed in as BASIC asks for it. 


For example: 


10 INFUT AsBsC 


will cause BASIC to pause during execution, print a question mark, and 
wait for the user (you) to type three numerical values. The constant 
values must be separated by commas and terminated with the RETURN key. 
Only one question mark is printed for each INPUT statement. 


If enough values are not supplied, BASIC will print: 


ERROR 121 AT LINE nnn 


If too many values are supplied, BASIC will print: 
ERROR 122 AT LINE nnn 


where nnn is the line number of the INPUT statement. In either 
case, BASIC will print another question mark and wait for the 


requested input. 


The INPUT statement may be used anywhere in the program == 


on a line by itself or anywhere in a multiple statement line. 
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It is often desirable to write a group of statements 


GOSUB AND RETURN STATEMENTS 


(a subroutine) 


only once in a program and then branch to the subroutine repeatedly 
The last statement of the sub- 


from various points in the program. 


routine should be a RETURN statement. 


branch (jump) to the first statement of the subroutine. 


However, a Single RETURN statement will suffice for a single subroutine 


branched to by more than one GOSUB, as illustrated below. 


The GOSUB statement is used to 


The RETURN statement must be used in conjunction with GOSUB. 


The sub- 


routine in lines 75 through 78 is entered from the GOSUB's in lines 
40, and 55, and exited by the RETURN in line 78. 


20, 
S PRINT "XX"; "Xta"s 
19 FOR A = 1 TO 5 
15 LET X = A 
28 GOSUB 75 
25 NEXT A 
28 FOR A = 1 TO 5 
30 LET X = Ate 
48 GOSUB 75 
45 NEXT A 
48 FOR A = 1 TO 5 
90 LET XK = At3 
59: -GOSUB- 75 
60 NEXT A 
65.570 .P 
tO POR I = 1. TO" S 
76 PRINT XtJs 
77 NEXT J 

78 RETURN 

80 END 

RUN 

x Xt e 

1 1 

2 4 

3 2 

4 L6 

2, ramp 

1 

4 16 

9 81 

1é 256 

25 625 

1 

& 64 

a7 Teg 

64 4096 

ras 15625 
STOP AT LINE 65 
READY 


xt Zee 


64 

129 
AQ9E 
15-625 
1 

Sie 

19 683 
262144 
LISo be 


wx t St 


xtT4 

1 

16 

oil 

Zoe 

625 

1 

256 

6561 

C9536 

SIA 62S 

1 

ABIE 

531441 

°lE77722F & 
S) “C441 406F 9 


Xt5 
1 
32 
243 
1024 
3125 
1 
1A24 
SIBDAI 
1D4E576 
ZTESECE 
1 
32768 
° L4A34891F & 
e1A73742F 19 
230 OL 7S6R). 11 


Both GOSUB and RETURN can be written in multiple statement lines, 


provided they are the final statements in their respective lines. 
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3.9.1 Nested Subroutines 


Subroutines may contain calls to other subroutines. When written 
this way, the inner subroutine call is referred to as nested. 
Such ordering might appear as follows, where a GOSUB statement at 
line 20 calls a subroutine at line 100, which in turn calls a 
nested subroutine at lines 117 and 150. Note in the following 
example that one RETURN statement serves all three GOSUBs. 


10 DATA 234 

15 READ A»sB 

20 GOSUB 182 
eo..210P 

100 LET X=A 

Li3 Et Yee 

i117 GOSUB. 180 

1360 LET X=Xte 

140 LET Y=CyYte) 
150 GOSUB 180 

16Q@ LET X=A + 1/A 
176 LET Y=B - 1/74 
1890 PRINT XsY 

182 RETURN 


RUN 

C 4 

4 16 
2e5D 3¢5 


STOP AT LINE ao 
READY 


Such nesting can be carried to any level. The only restric- 
tion is: for each nested subroutine entered a return address 
(line number) must be stored until the RETURN statement is executed. 
In systems with limited core space, deep nesting may reduce work- 
ing storage below the requirement for the user program. (See Ap- 


pendix A for storage requirements.) 


An example of nested subroutine calls is illustrated in 


Figure 3-l. 


XXX GOSUB 199 
-<NEXT STATEMENT>~ ~~ 7 


XXX STOP 


| 
H 
H 
199 GOSUB 299---------l-------+--> 
195 <NEXT STATEMENT> - - -' ges veida, tae r 
| 
: | | ! 
: ! ! 
: 
132 RETURN ------- — > : 
299 <1ST SUBROUTINE STATEMENT>-- | - -- 
7 i 
i 
° { 
249 RETURN--------------3 
25¢ END 
Figure 3-1. Nested Subroutine Call 


In Figure 3-1, above, from line 100 until line 240 two return 


addresses are stored. 


3.10 UNCONDITIONAL BRANCH, GOTO STATEMENT 


The GOTO statement causes an immediate jump to an indicated line 
number. Program execution continues sequentially again beginning 


with the statement jumped to, as shown in the following example: 


1@ DATA 132535455 
15 READ X 

20 PRINT X+1 

48 GOTO 15 


ERROE 26 AT LINE 15 
READY 


The general format of the statement ig 
18 GOTO <line number> 
Statements 15, 20, and 40 in the above example constitute a loop. 
These three statements are re-executed continuously with a new 


value of X each time line 15 is executed, until the last constant 


value previously introduced at line 10 is used. 
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Program execution ends with an error message, indicating 
that all data values have been used. This error message does not 
indicate that the program printout iS inaccurate (error messages 


are explained in Chapter 6). 


In the following example, the GOTO statement provides a 


jump to an INPUT statement so that the program loops continually. 


10 INPUT A 
C0 PRINT A> 
30 LET A=ATA 
4Q PRINT A 
5@ PRINT 

60 GOTO 190 


If written on a multiple statement line, GOTO must be the 


last statement on the line. 


3.11 CONDITIONAL BRANCH, IF STATEMENT 


The IF statement supplies a conditional program branch. The 
general format of the statement is: 
THEN <statement> 


45 IF <expression> <operator> <expression>|THEN <line number> 
GOTO <line number> 


NOTE 


The IF-THEN <statement> sequence is a special 
feature ot PDP-1l BASIC. 


THEN can be followed by any statement including another IF 
statement. If a line number follows THEN, the IF-THEN statement 


operates in the same manner as IF-GOTO. 


When BASIC encounters the IF statement, it evaluates the 
expressions and compares them according to the requirements of 
the logical operator, shown in Table 3-1. If the test condition 
is met, the remainder of the statement beginning with THEN or 
GOTO is executed. If the test condition is not met, the next sequen- 


tially numbered statement after the IF statement is executed. 


In the following example, a FOR-NEXT loop is in lines 10 
to 35; the range of the control variable is 1 to 10. The IF-GOTO 
statement is used to limit the range of the variable contained 
in the FOR-NEXT loop. Operation of the loop continues until the 


relationship A>4 is true, then immediately branches to line 55. 
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TABLE 3-1. Logical Operators 


| Standard BASIC 
Symbol Version Meaning 


equal to B 
less than B 


less than or 
equal to B 


greater than B 


greater than or 
equal to B 


not equal to B 


1G FOR A=1 TO 12 

eG LET X=Ate 

eo Ik A>4 GOTO 55 

3Q@ PRINT X 

35 NEXT A 

4Q PRINT "VALUE OF AIS "A 
Dor OP 


STOP AT LINE oe 
READY 


If line 10 is changed to 


10 FOR A=1 TO 8 


the conditional statement at line 30 will have no effect on the 
program. The loop will end normally when A reaches a value of 
3 and program execution will continue with the PRINT statement 


at line 40. 


In the following example, THEN is followed by a line number at 
line 45 and by a statement at lines 40 and 50. 


At line 40, if X is less then or equal to 70, BASIC goes to line 
45 and the PRINT statement at line 40 is not executed. 


At line 45, if X is less then or equal to 70, BASIC goes to line 


50 and the jump (or branch) to line 20 is not executed. 


At line 50, if X is greater than 70, BASIC goes to line 55 
and the PRINT statement at line 50 is not executed. 


1@ REM - PROGRAM TO ASSESS GRADES 

CO PRINT 

25 INPUT A>B;CsD 

30 LET % = CA+Bt+C4+DI 724 

35 PRINT: PRINT 

4Q@ IF X>=70 THEN PRINT Xs "SATISFACTORY GRADE" 
AS IF X>=70 THEN e2@ 

o0@ IF A<70 THEN PRINT “FAILED THLS COURSE" 

Ho. GOTO <2 


RUN 


toe 6 1s 16269 


Jeeed SATISFACTORY GRADE 


2552 445 32s el 


FAILED THIS COURSE 


Ke 


The IF statement can be used anywhere in a multiple statement 
line except when a GOSUB or GOTO statement follows THEN. In this 
case, the restriction on GOSUB applies, i.e., the IF statement must 


be the last statement on the line. 


A THEN-GOSUB statement provides a conditional jump to a sub- 
routine. GOSUB must be the last statement on the line. Comple- 
tion of the subroutine returns control to the statement on the 
line following the IF statement (the next line in numerical se- 
quence). An extension of our previous example will illustrate this 


statement. (Note the conditional GOSUB in line 80.) 


10 REM - PROGRAM TO ASSESS STUDENT GRADES 
LS PRINT 

eU-UPRINT “STUDBN TANG 2's 

36 INPUT A 

4Q PRINT "ENTER QUARTERLY GRADES -"'5 

5@ INPUT B»sCsDsE 

60 LET ~A-= €BtCG+D+E) 74 

70 IF X<7@ THEN PRINT "FAILED COURSE -"3 X 
6@ IF X>=70 THEN GOSUB 14@ 

90 GOTO 15 

LOG Le Roos THEN PRINT “HONORS: "sx 

L1@ IF X<=95 THEN PRINT "PASSING GRADE <-"'s X 
120 RETURN 


RUN 


STUDENT NO --?1 
ENTER QUARTERLY 
PAIGE D COURSE = 


STUDENT NO -?2 
ENTER QUARTERLY 
HONORS - 96-75 


STUDENT NO -?3 
ENTER QUARTERLY 
PASSING GRADE - 


STUDENT NO 
READY 


res 


The IF statement at 
the same 
70. =The 


at lines 


IF statement at 
100 through 120 


equal to 70. 


The RETURN at line 120 is to line 90 which, 


GRADES -?455 555 605 4@ 
50 

GRADES -? 98s 975s 9es 100 
GRADES <2 659. (59 80s. 77 
74¢25 


(CTRL/P was typed here) 


line 70 allows the PRINT statement on 


line to be executed only if the value of X is less than 


line 80 causes a jump to the subroutine 


if the value of X is greater than or 


in turn, causes 


a jump to line 15 to keep the program looping. 
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SUBSCRIPTED VARIABLES 


BASIC allows the use of subscripted variables for handling data 


arrays. 


Section 2.5.2 can be given a series of values: 


reference the specific array; 


data item in the array. 


are: 


Any variable name formulated according to the rules in 


the variable names 
the subscripts reference a particular 


Typical subscripted or array variables 


A(M), A(1), A(2), A(3)...A(n) 


when used to reference a 


A7(@,0), A7(G,1), A7(1,0), A7(1,1), 


one-dimensional array, or list, and 


Secg BT (Ayn) 


when used to reference the data items of the two-dimensional ar- 


ray A7 (BASIC is limited 


to arrays of two dimensions). 


NOTE 


Array names consisting of a letter followed by a 


number are legal; 


PDP-11 BASIC. 


this is a special feature of 


NOTE 


Subscripts in PDP-1ll BASIC begin with (0) for a 
One-dimensional array and (0,0) for a two-dimen- 


Sional array. For these initial items the sub- 
script need not be coded with the array name. 
A(0,0), A(0), and A are the same variable. 


3.12.1 The DIMension Statement 


Prior to creating a data array of any size, a DIM statement must 
be executed to reserve storage space. The statement must contain 


the array name and maximum potential subscript: 


26 DIM A1lC45;4) 


Because subscripts in PDP-1l BASIC begin with (0) or (0,0), the 
statement above will reserve space for a 5 x 5 array, or one 


capable of containing 25 discrete items. 


Dimensioning a previously used variable is illegal. For 


example, the following will produce an error message. 


POET AS. =: CPG + B73 


4Q0 DIM A3C2,5) 


The greatest possible subscript for any array variable is (255) 
for a variable representing a list, or (255,255) for a variable 
pe See gta ee ea ee ee 
vides data for computing potential array size for a given amount 


of core. 


3.12.2 Generating Arrays 


Array variables have special relationships which simplify 
operations on multiple data items. A list can be formulated, 
and unigue subscripts generated at printout, as follows. (Note 
that lines 10 to 40 in the example build the array and fill it with 
zeroes to prepare it for data entry.) 


1G “DIM -AC1T9:) 

cO@ FOR I=@ TO 19 
30 LET ACI)=@ 

4Q NEXT I 

45 LET I= 

5@ INPUT X 

60 LET ACI)=xX 
TE Pek te 
6®@ GOTO 5@ 


27TP (CTRL/P was typed here) 


PRINT A 
5 

PRINT AC1) 
6 

PRINT AC2) 
7 

PRINT AC3) 
8 

PRINT ACA) 
9 

PRINT AC5) 
D 

PRINT AC6) 
B 

PRINT AC29) 


ERROR 6 AT LINE 0 
READY 


Above, execution of the program is stopped with CTRL/P (see Sec- 
tion 5.5) after the introduction of five constants. PRINT is then 
used in immediate mode to examine the initial array elements. An 
attempt to print the contents of an array location beyond the limit 
set in the DIM statement produces the error message in the next to 


last line of the example program. 


The previous program is continued below to demonstrate how an 


array can be printed out automatically. 


69: REM -= LINES 90 THRU 120 PRINT THE LEST SEQUENTTALILY 
90 FOR I=@ TO 19 

100 PRINT "AC™IN)", ACI) 

110 NEXT I 

Lew. STOP 

l25 REM - LINES 13@ THRU 15@ PRINT A PORTION OF THE 
i26.- REM. = LIST IN REVERSE, ORDER 

136 FOR I=6 TO @ STEP -1 

L395 PRINT “AC™EN 2s ACT) 

140 IF I=@ THEN STOP 

50 NEAT 2 


e7P (CTRL/P was typed here) 


-~Vwwvunvvuyv VIO 
& 
Qreroaoupwone 


Ww 


(CTRL/P was typed here) 


ee) 
es) 


NO OO oO 
—-wMwkOQA 


STOP AT LINE 14@ 


3.12.3 Two-Dimensional Arrays 
The two-dimensional array is logically represented as a table of 
two or more rows and columns. A 3 x 3 array, designated M, is 


represented below: 


g 1 2 - columns 


M(%,9) M(%,1) M(f,2) 
M(1,9) M(i,1) M(9, 2) 
M(2,9) M(2,1) M(2,2) 


natok 
NO fF BW 


Note that the initial constant in the subscript represents the 
row designation. 


In the following example program, space is reserved for a 
two-dimensional array (line 10) and it is zero-filled (lines 20 
- 45). In lines 20 and 25, the order of subscripts is optional: 
it does not matter whether the array is zero-filled starting with 


the first or last array item. However, if the order is reversed: 


CO FOR J=G TO 4 
25 FOR I=@ TO 4 


then the order in lines 40 and 45 must be reversed: 


40 NEXT I 
45 NEXT J 


This is to conform to the rule for nested FOR-NEXT loops: the 


range of the nested loop must lie entirely within the range of 


the outer loop 


10 DIM AC4s 4) 

e6 FOR I=0@ TO 4 
25 FOR J=@ TO 4 
30 LET ACI,J)=@ 
4Q NEXT J 
AS NEXT I 
5@ FOR I=0 TO 4 
bo. POR J=0° “TO: A 
60 INPUT X 


70 LET 


60 NEXT J 
SS NEA 
100 FOR 1=@ TO 4 
105 FOR J=@ TO A 


1190 P 


RENT 


120 NEXT J 
[25 NEAT I 


D> 
oN 
mH RFR Ke QOQQQ @A 


READY 


1O@ 


Co (oe oe Gr ho eS 


~ 
WwrvyvrvuvvvvvvV vv 


ACIsJ)=xX 


se AN wet ws aA ake Mauer 


Go SOS ONO le Go: 1 


ACIsJ) 


(CTRL/P was typed here) 


(CTRL/P was typed here) 


Lines 50 - 85 provide for data input from the keyboard, and 


limit inputs to the number of data spaces available in the array. 


Lines 100 - 125 provide for printout and labelling of the 
array data items. The order of subscripts in lines 100 - 125 
must correspond with the order in lines 50 - 85 if the data is 
to be printed out and labelled in the same order in which it 


was entered. 


The guestion marks following RUN were printed by the INPUT 
statement; the integers were typed in by the user. (The entire 


array was not filled.) 


Program printout appears after the immediate mode GOTO 100 
statement. Since only seven data items were entered, the program 


began to print zeroes after the seventh array item. 


CHAPTER 4 


MATHEMATICAL FUNCTIONS 


4.1 INTRODUCTION 


BASIC contains ten functions to perform mathematical operations. They 


relieve the user from programming his own routines to calculate such 


things as square roots, logarithms, etc. 


These functions have a three-letter call name followed by a 
parenthesized argument. They are pre-defined and may be used any- 


where in a program. 


Call Name Function 

SIN (x) Sine of x, where x iS expressed in radians 

COS (x) Cosine of x, where x is expressed in radi- 
ans 

ATN (x) Arctangent of x is returned as an angle in 


radians in range +1/2 


SOR (x) Square root of x 

EXP (x) Exponential of x 

LOG (x) Natural logarithm of x (LOG. (x) ) 

ABS (x) Absolute value of x 

INT (x) Truncate fraction part of x (truncates to 


the largest integer not greater than x) 
RND (x) Generate random number between @ and 1 


SGN (x) Return a value indicating the sign of x 


The argument x to the functions can be a constant, a variable, 


an expression, or another function. 


The first four functions (SIN, COS, ATN, SOR), termed extended 
functions, may be deleted when loading BASIC (as explained in Chap- 
ter 7). Deleting the extended functions provides an extra 300 words 


of storage for user programs. 


If floating-point exponentiation is not needed, the EXP and 
LOG functions may be deleted (see Chapter 7), providing another 
250 words of user storage. When these functions are deleted, all 


exponentiation will be done by repetitive multiplications, result- 


ing in slower processing time but providing more storage space 


for user programs. 


4.2 USAGE 


Function calls, consisting of the function name followed by a 
parenthesized argument, can be used as expressions or as elements 


of expressions anywhere that expressions are legal. 


The functions SIN(X), COS(X), ATN(X), SQR(X), EXP(X), and 
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LOG(X) produce a value accurate to +l in the 10 ~ position. 


4.2.1 Sine and Cosine Functions, SIN(X) and COS (X) 


The sine and cosine functions require an argument angle expressed 
in radian measure. If the angle is stated in degrees, conversion 


to radians may be done using the identity: 
<radians> = <degrees> Gas) 


In the following example program, 3.14159265 is used as a 
nominal value for T. P is set equal to this value at line 20. 
At line 40 the above relationship is used (in the expression 


within the LET statement) to convert the input value into radians. 


1Q REM - CONVERT ANGLE (€X) TO RADIANS, AND 

Ld RES eS IND SEN. AND: oCOs 

e® LET P = 3-14159265 

25 PRINT “DEGREES™s "RADLANS”s "'SINE"™> "COSINE" 
30 INPUT X 

4Q LET Y = X*P/18@ 

60 PRINT Aa Ys SINCY)s COSCY) 

70 GOTO 32 


RUN 
DEGREES RADIANS SINE COSINE 

20 

@ Q Q 1 
2710 

1Q ~1745329 ~1736482 ~9848076 
720 

Bye - 3498658 - 3420201 9396926 
239 

30 - 5235988 25 - 8660254 
2360 

360 6+283185 -.29258 36E-8 1 

245 

A5 ©7853962 - 7071068 -7071868 
2290 

90 1.570796 1 ~1462918E-8 
?tP 

READY 


4.2.2 Arctangent Function, ATN(X) 


The arctangent function returns a value in radian measure, in 
the range +5 to - 5 corresponding to the value of a tangent 
Supplied as the argument (X). 


In the following program, input is an angle in degrees. Degrees 
are then converted to radians at line 40. At line 50 the radian value 
(Y) is used with the SIN and COS functions to derive the tangent of 
the input angle according to the identity: 


SIN (X) 


BANOO Cosix): 


At line 70 the tangent value, Z, is supplied as argument 
to the ATN function to derive the value found in column 4 of 
the printout under the label ATN(X). Also in line 70 the 
radian value of the arctangent function is converted back to 
degrees and printed in the fifth column of the printout as a 


check against the input value shown in the first column. 


1@ LET P = 3-14159265 

e@ PRINT "SUPPY AN ANGLE IN DEGREES" 

eo PRINT - "ANGLE “ANGLES TANCKI ss “A TANCK Is “ATANCK I 
26 PRINT “CDEGSI"s"CRADS) “ses "CDEGS)™ 

30 INPUT X 

4QO LET Y = X*P/18@ 

50° BEE 2 °:= SIN CYI7COSCY?) 

70 PRINT Xs YsZsATNCOZ)5ATNOZI*180/P 

Bo: PRINT 

96 GOTO 3@ 


RUN 
SUPPY AN ANGLE IN DEGREES 
ANGLE ANGLE TAN CX) A TAN CX) ATAN CX) 
CDEGS? CRADS) CDEGS? 
20 
a) 0 0 0 W 
245 

> °765398e2 1 e1O D390 2 45 
290 
96 1+570796 °6835653E 9 1-S570796 90 
gas 
READY 


4.2.3 Square Root Function, SQR(X) 


This function derives the square root of any positive value as 


shown below. 


1@ INPUT X 
26 LET X = SQRCX) 
3@ PRINT X 
4Q GOTO 190 


RUN 
e716 

li 

2100 

12 

21220 
31+62278 
2123456789 
Piers ict 
2L7 
4.123106 
225E2 

50 
21970 

Ae 38468 
?1P 
READY 


4.2.4 Exponential Function, EXP(X) 
The exponential function raises the number e to the power x. EXP 


is the inverse of the LOG function. The relationship is 
LOGCEXP(X)) = XK 


The following program prints the exponential equivalent of 
an input value. Note that the output values derived below are 


used as input to the LOG function in Section 4.2.5. 


10 INPUT X 
20 PRINT EXPCX) 
4Q GOTO 10 


RUN 
24 
5459815 
2 10 
22926-47 
2? 9+421096 
12344.99 
2? 4.60517 
99.99998 
2 25 
~720049E 11 
2 1P 
READY 


4.2.5 Logarithm Function, LOG(X) 


The LOG function derives the logarithm to the base e of a given 
value. In the following program at line 20, the LOG function is 


used to convert an input value to its logarithmic equivalent. 


1Q INPUT X 
20 -PRINT W0G6 Cx) 
30 GOTO 18 


RUN 

254259815 
4 

22202647 
10 

212345 
9.421026 

2102 
4.60517 

—2e720049E11 

25 

?TP 

READY 


Logarithms to the base e may easily be converted to any 


other base using the following formula: 


log N= sod EN 


log,a 


where a represents the desired base. The following program 


illustrates conversion to the base 10. 


1 REM - CONVERT BASE E LOG TO BASE 1@ LOG- 
So PRINT “VALUE"s "BASE. (E LOG" “BASE 10 LOG” 
tS EN PU x 

17 PRINT X; 
26 PRINT LOG(C(X)s; 
4Q@ PRINT LOGCX)/LOGC1@) 


5@ GOTO 15 
60 END 
REA DY 
RUN 
VALUE BASE: © 06 BASE 12 LOG 
24 

4 1+ 386294 » 60286 
?e5o 

550 5-521461 B.39 794 

25 

5 1609438 169507 

260 

60 42 Q94345 13°778 151 
2100 

100 4.60517 2 

21P 
READY 


4.2.6 Absolute Function, ABS (xX) 
The ABS function returns an absolute value for any input value. 
Absolute value is always positive. In the following program, various 


input values are converted to their absolute values and printed. 


10 INPUT X 
ood LET A = 
30 PRINT > .x 
4Q GOTO 1@ 


ABSCX) 


RUN 
C= 3504 
357 
72 
= 
TA2OR10 
ecor Le 
CPV S555067/ 
elQ55556E °9 
210-128345 
1012345 
2-44. 555566666599 
44655557 
24P 
REA DY 


4.2.7 Integer Function, INT(X) 


The integer function returns the value of the greatest integer 


not greater than x. For example: 


PRINT INTC34-67) PRIN I INT C561) 
34 ~6 


The INT of a negative number is a negative number with the same 
or larger absolute value, 1.e., the same or smaller algebraic 


value. For example: 


PRINT INTC=23245) 
-24 


PRINT INTC=14539 
cad re 


The INT function can be used to round numbers to the nearest 


integer, using INT(X+.5). For example: 


PRINT INTC34-67+.-5) PRINT INTC-5-1+-5) 
35 =5 


INT(X) can be used to round to any given decimal place or 
integral power of 10, by using the following expression as an 


argument: 


(X*19+D+.5) /19+D 


where D is an integer supplied by the user. 


10 REM - INT FUNCTION EXAMPLE. 

15 PRINT 

20: PRINT “NUMBER. ‘TO: BE: :ROUNDEDS™ 

ao ANPUT A 

46 PRINT "“NO- OF DECIMAL PLACES:" 
45 INPUT D 

60 LET B = INTCA*1@01tD + -5)/101D 

7@ PRINT “A ROUNDED = " B 

6@ GOTO 15 

90 END 


RUN 


NUMBER TO BE ROUNDED: 


255265842 
NO» OF DECIMAL PLACES: 
22 

A ROUNDED = 55-66 


NUMBER TO BE ROUNDED: 


2782375 

NO» OF DECIMAL PLACES: 
2-2 

A ROUNDED = 102 


NUMBER TO BE ROUNDED: 
267+ 38 

NOe« OF DECIMAL PLACES: 
2-1 

A ROUNDED = 72 


NUMBER TO BE ROUNDED: 
21P 
REA DY 


4.2.8 Random Number Function, RND(xX) 


The random number function produces a pseudo-random number, or 
random number set, between 0 and 1. The numbers are reproducible 
in the same order for later checking of a program. The argument 
(x) is not used and can be any number; it serves only to standard- 


ize all BASIC function representations. For example: 


10 REM - RANDOM NUMBER EXAMPLE. 
25 PRINT "RANDOM NUMBERS:" 


O07 FOR «EL = 1 TO. 15 

46 PRINT RND(COQ); 

50 NEXT I 

60 END 

RUN 

RANDOM NUMBERS: 
~1082e580e2 °96481 32 
3061216 200093 
°9654126E-1 °5221863 


STOP AT LINE 60 
READY 


To obtain random digits from 0 to 9, change line 40 to read 


40 PRINT INTC1@O*RNDCQO)); 


and run the program again. This time the results will be printed 


as follows. 


4A@ PRINT INTC1@*RNDCO))>; 


RUN 

RANDOM NUMBERS: 
1 9 
S ras 
Q =) 


STOP AT LINE 60 
READY 


It is possible to generate random numbers over a given range. 


“8866272 
°9582e214 
°2462463 


tf Oo ® 


© 6364441 
°1793518 
°7778@15 


— 


If the open range (A,B) is desired, use the expression: 


(B-A) * RND(Z) +A 


The following program produces a random number set in the 


open range 4,6 (the extremes, 4 and 6, 


are never reached). 


16 REM - RANDOM NUMBER SET IN OPEN RANGE 456. 


eO FOR B= 1 TO 15 


6 LET A = €6=4) <* RNDCO) + 4 


AQ PRINT As 


50 NEXT B 

60 END 

RUN | 
4.2005 5929626 
4.612244 4.571106 
4.197083 5+ 044373 


STOP AT LINE 60 
READY 


5*©773254 
5°©916443 
4-492493 


Sec (2OGo 
4- 358704 
5b* 559603 


© 390198 
°©4521179 
©450592 


& Db & 


5° 676804 
4e9Q4236 
40981184 


4.2.9 RANDOMIZE Statement 


co The RANDOMIZE statement causes the random number generator to 
calculate different random numbers every time the program is run. 
When executed, RANDOMIZE causes the RND function to choose a 
random starting value to produce random results. For example: 
: 1@ REM - RANDOM NUMBERS USING RANDOMIZE. 
15 RANDOMIZE 
25 PRINT "RANDOMIZED NUMBERS:" 
; 30 FOR I = 1 TO 4 
4Q@ PRINT RNDC@Q); 
5@ NEXT I 
60 END 
RUN 
RANDOMIZED NUMBERS: 
°7785034E-1 SLG3255.5 °-2787781 ee 35217 
STOP AT LINE 60 
READY 
RUN 
RANDOMIZED NUMBERS: 
°-6417053 °-1678467E-2 ©43472e9 °593e312 
STOP AT LINE 6@ 
READY 
RUN 
RANDOMIZED NUMBERS: 
°-6651917 °2646375 © 7210999 ©7648 6e1 
STOP AT LINE 6@ 
oo READY 
Removing the RANDOMIZE statement and changing line 25: 
DELETE 15 
REA DY 
25 PRINT "REPRODUCIBLE RANDOM NUMBER SET." 
program output is as follows. 
RUN 
REPRODUCIBLE RANDOM NUMBER SET. 
1002502 °-964613e °-66662eT72 °6364441 
STOP AT LINE 60 ee 
: READY 
RUN 
REPRODUCIBLE RANDOM NUMBER SET. 
» °1002502 °964813e “8666272 6364441 
° STOP AT LINE 6@ 
READY 
RUN 
ry ~REPRODUCIBLE RANDOM NUMBER SET- 
1002502 ©9648132e “6666272 °6364441 
STOP AT LINE 60 
READY 
ar 


4.2.10 Sign Function, SGN(x) 


The sign function returns the value 1 if x is a positive value, 0 if 


x is 0, and -l if x is negative. For example: 


PRINT SGNC3- 42) 
1 


PRINT SGNC-42) 
= 


PRINT SGNC23=-23) 
@ 


The following example program illustrates the use of the 


SGN function. 


10 REM - SGN FUNCTION EXAMPLE. 

2G READ A>BsC 

25 PRINT "A = "A» "“"B = "Bs "C = "C 

3@ PRINT "'SGNCA) ="SGNCA)s "SGNCB) ="SGNCB)> 
40 PRINT "SGNCC) ="SGNCC) 

5@ DATA -7+32s «445 @ 


60 END 

READY 

RUN 

A = -7+3e B = 244 C = @ 
SGNCA) =- SGNCB) = 1 SGNCC) = @ 


SLOP AT LINE 60 
READY 


4.3 USER-DEFINED FUNCTIONS 


In some programs it may be necessary to use the same mathematical 
expression in several places, often using different data. BASIC's 
user-defined function enables you to define unique operations or ex- 
pressions and call them as you would the standard mathematical func- 


tions, i.e., Sine, cosine, Square root, etc. 


The user-defined function is identified by a three-letter call 


name followed by a parenthesized argument. The first two letters of 


the function name are FN and the third letter may be any letter in the 


alphabet; thus, as many as 26 unique user-defined functions are 


possible. The parenthesized argument is explained below. 


The user-defined function must be defined before it can be used. 


It is defined using the DEF statement; the general format is: 


DEF FNa(variable) = expression 


where "a" can be any letter. For example, 


10 DEF FNX(S) = St2+4 
would cause the statement 
2 LET R = FNX(4) 
to be evaluated as LET R=4+2+4, or 
20 LET R = FNX(2) 


to be evaluated as LET R=2t2+4. The function name, FNX(S), represents 
the expression, St2+4, in the DEF statement, and when called, the 
parenthesized argument, (4) or (2), is equated with the function vari- 
able, (s). 


When called, the parenthesized argument may be any legal expres- 
Sion; the value of the expression is substituted for the function 
variable. In the following example, the function FNZ at line 10 will 
square whatever is substituted for the function variable. At line 30 
the expression 2+A evaluates to 4, which is then squared to give a 
printed result of 16. 

10° DEE RPNACK): = 2 


20 LET A = 2 
30 PRINT FNZC2e+A) 


RUN 
16 


STOP AT LINE 39 
REA DY 


Here's another example: 


10 DEF FNACZ) = Z+At+B 
20 DATA 234 

306 READ A>B 

40 LET F = FNAC9) + 1 
5@ PRINT F 


RUN 
16 


STOP AT LINE 9G 
READY 
The function name may be used recursively, as in the following 
example. The expression in line 30 is evaluated as (2+(2%*4)) before 


being squared in line 10. 


10 DEF FNACX) = XKte 
e6@ LET A = @ 
30 PRINT FNAC2+A*FNAC2) ) 


RUN 
100 


STOP AT LINE 3¢ 
READY 
If the same function name is defined more than once, the first 
definition is used and subsequent definitions are ignored, as shown 


below. 


1@ DEF FNXCX) = Xte 
26 DEF FNXCX) = XK+xX 
30 PRINT FNXC6) 

4Q END 


RUN 
36 


STOP AT LINE AQ 
READY 
The function variable need not appear in the function expression; 
later substitution of an expression for the variable will have no 
affect, as illustrated below. 
10 DEF FNACX) = 4 + 2 


ef LET R = FNAC1@) + 1 
38 PRINT R 


RUN 
7 


STOP AT LINE 39 
READY 


CHAPTER 5 


BASIC COMMANDS 


BASIC's commands are used to perform various Operations such as 
executing a program, stopping program execution, punching a pro- 
gram on paper tape, loading a program from paper tape, etc. 

5.1 LIST 


To obtain a clean copy of an edited program, type LIST followed 
by the RETURN key. The program will be printed on the Teletype 
and BASIC will again print READY. 


To print a single line, type its line number after LIST. 
To print a series of lines, ' follow LIST with the initial and 
ending line numbers; these lines plus all lines between them will 


be printed. For examples: 
LIST 37 

prints line 37; 
LIST 3752126 

prints lines 37 through 126; 
Lal 

prints the whole program. 


5.2 DELETE 


The DELETE command is used to erase lines from the program. The 
DELETE command requires an argument. This prevents accidental deletion 


of the entire program. 


If only one line number is given after the DELETE command, 
that one line will be deleted. If two line numbers separated by 
a comma are given, those two lines and all lines between them will 


be deleted. For example: 
DELLE Ts, 541 


will erase only line 54; 


DELETE 362675 
will erase lines 36 through 876; 
De ETE ds 3191 
will erase the entire user program storage area. 


NOTE 


If, for example, DELETE 10,5 is typed where the 

initial line number is greater than the second, 

BASIC will respond with READY, but no lines will 
be deleted. 


5.3 SAVE 


SAVE will punch the user's BASIC program on the low-speed or 
high-speed punch, depending on your response to BASIC's initial 


dialogue at load time (see Chapter 7). 


When using the high-speed paper tape punch, turn the punch on 
before issuing the SAVE command. When using the low-speed punch, 
type SAVE, turn the punch on, and then type the RETURN key. 


NOTE 


When BASIC finishes punching the saved program 
it punches 64 frames of trailer tape and then 
types READY. If the low-speed punch is used, 


READY is also punched into the tape and will 
Cause errors when the tape is read. (READY will 


be interpreted as an immediate READ Y). To avoid 
this problem the user must: 


a. Turn the punch off while trailer tape is 
still being punched; or 


b. If punching is complete, tear the tape 
within the trailer section, eliminating the 
extraneous code which appears at the end. 


5.4 OLD 


The OLD command is used to read in user programs which were pre- 
viously saved on paper tape. Either the low-speed or high-speed 
reader may be used, depending on system configuration and your 


response to BASIC's initial dialogue (see Section 7.1). 


To read in a paper tape, place the tape in the appropriate 
reader and then type the OLD command followed by the RETURN key. 
After the tape stops, BASIC prints READY. 


NOTE 


When the low-speed reader is used, CTRL/P must be 
typed with the tape stops; BASIC then prints READY. 


As the tape is read in, BASIC scans each line. Any of several 
fatal errors may be detected as the saved program is scanned. These 
will cause printout of an error message and termination of the read- 


in. 


In executing the OLD command, BASIC automatically clears core 
before starting the reader. Any programs in core will be lost, with 


the exception of EXF function programs (see Chapter 8). 


Once in core the saved program can be edited, added to, or 


executed in the same manner as a newly-created program. 


5.5 STOPPING A RUN, CTRL/P 


Typing CTRL/P causes BASIC to stop execution at the end of its.current 
task or statement, print +P, and then READY. There may be a delay 
from the time CTRL/P is typed until BASIC prints READY. If, for ex- 
ample, CTRL/P is typed while a PRINT statement is executing, BASIC 
will complete the PRINT statement before typing READY. 


CTRL/P has no affect on variable values. Therefore, after typing 


CTRL/P, variable values may be examined or used in PRINT statements. 


5.6 RUN 


The RUN command causes deferred mode programs to begin execution 
starting at their lowest numbered line. When RUN is used to re- 
run a program previously executed, all variable values are deleted 
from memory. If the RND(X) function is included within the pro- 


gram, it is reset to its initial starting value. 


5.7 COMMANDS IN USER PROGRAMS * 


It is possible to include the BASIC commands RUN, LIST, DELETE, 


SAVE, and OLD, preceded by a line number, in user programs. 


this usage iS a special feature of PDP-1l BASIC. 


5=3 


When the command is encountered, the requested operation will be 


performed. 


When RUN is executed in a program, it causes the program to 
restart. This can be useful to obtain repeated results from a 


program. 


When the LIST, DELETE, SAVE, and OLD commands are used in a 
program, BASIC exits from the program and prints READY upon com- 


pletion of the commanded operation. 
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—_— ERROR MESSAGES 


6.1 FORMAT 


BASIC checks program statements and input for errors, and prints 
an appropriate error message for each error detected. Messages 


are printed in the following format: 
ERROR xxx AT LINE yyy 


where xxx is the error code, as described below, and yyy is the 
number of the line in which the error occurred. If yyy appears 
as 0, it indicates that the error was made while in command mode, 


that is, the error was made at the last line typed in. 


Error codes from 0 to 64 indicate a fatal error -- program 
execution will halt with the printing of the error message. 
Codes from 65 to 127 indicate a non-fatal error -- the program 


may continue to run after the error message is printed. 


a 
6.1.1 Fatal Errors 
Error Code Meaning 
i) User storage overflow (see Appendix A, Sec. A.6) 
1 Unrecognizable statement 
2 Illegal GOTO or GOSUB 
3 Illegal character terminating a state- 
ment (usually caused by an ill-formed 
statement which causes the statement 
operation to end prematurely). 
4 RETURN without corresponding GOSUB 
5 Badly formed subscript 
6 Subscript not in range @ to 255 or 
: exceeds maximum set by program 
7 Mismatched parentheses 
8 Illegal LET 
‘ 9 Tllegal relational operator in IF 
: 19 Illegal IF 
11 Illegal PRINT 
12 Input line too long (exceeds 80 characters) 
13 Bad dimension in DIM statement 
14 Not enough storage for the array 
15 Badly formed DEF statement 
16 Illegal line number or dimension value 
17 DIM of previously declared or used item. 
It is illegal to dimension any item which 
—_ has been previously used in any way. 
18 Bad variable in INPUT list 
19 Bad variable in READ list 
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Error Message 


Meaning 


Out of data in READ list 

Bad DATA statement format 

Illegal FOR statement 

No NEXT matching FOR 

NEXT without FOR 

Unmatched quotes in statement 

EXP function improperly set up (bad link- 
age in location 50) 

ITll-formed expression (probably missing 
exponent on E format number) 


6.1.2 Non-Fatal Errors 


Error Code 


Meaning 


Tllegal characters on input 

Not enough data typed to INPUT 

Too much data typed to input 
Non-existent variable 

Number too large to fix (probably a 
subscript combination out of range) 
Divide/multiply overflow or underflow 
Square root of negative number 
Logarithm of negative or zero number or 
exponential overflow 


CHAPTER 7 


LOADING AND STARTING BASIC 


7.1 INITIAL DIALOGUE 


BASIC is supplied as a single binary paper tape and is loaded 
using the Absolute Loader (see Appendix D). Upon completion of 


loading, BASIC will type its name and version number followed by: 
*O 


which stands for option. The user may respond with parameters 
from the following list in any order separated by commas and 


terminated by typing the RETURN key. These parameters are: 


L Use the low-speed reader/punch for the 
SAVE and OLD commands instead of the 
high-speed reader/punch. If there is 
no high-speed reader/punch, the low- 
speed reader/punch will be automatically 
selected. 


D Delete the extended functions, i.e., SIN, 
COS, ATN, SQR. 


E Delete EXP and LOG, as well as the ex- 
tended functions. 


H Halt before entering the interpreter to 
allow loading of the EXF function (see 
Chapter 8). 


X Where X may be any integer between 4 and 
28 to override automatic assignment of 
memory. The automatic process assigns to 
BASIC all memory available in the proces- 
sor. This command allows the user to 
force BASIC to use less than the maximum 
configuration and is stated in increments 
of IK. 


If a user types only the RETURN key in response to *O, the 


options are as follows: 
1. If a high-speed reader exists on the system 
it will be utilized. 
2. All extended functions will be retained. 


3. BASIC will utilize all of available memory 
for the user storage. 


4. BASIC will not halt to allow loading an EXF 
function. 


7.2 LONG FORM OF DIALOGUE 


If a user does not understand the allowable options, he can type 
a question mark and the RETURN key to get the long form of the 
initialization. The long form will also result if his response 
to *O is in error. This will cause the following questions to 


be printed, which require individual YES or NO answers. 


DO YOU NEED THE EXTENDED FUNCTIONS? 
HIGH-SPEED READER/PUNCH? 
SET UP THE EXTERNAL FUNCTION? 


The final question shown below requires a numerical answer between 
4 and 28, as described under X in Section 7.1 above, or a RETURN 


key if automatic assignment of memory is desired. 
MEMORY? 

After the response to all queries, BASIC types: 
READY 


7.3 RESTARTING BASIC 


BASIC may be restarted by setting the ENABLE/HALT switch to HALT, 
placing 0 in the switch register, pressing LOAD ADDRess, setting 
ENABLE/HALT to ENABLE, and then pressing START. 


All program text and data will be cleared ina restart. 


7.4 LOADING THE EXF PROGRAM 


If the H option is among those typed in response to BASIC's *0O 
query, or if question 4 of the long form is answered YES, BASIC 
first attends to any other parameters that have been entered, 
then halts to allow loading of the assembler-coded program (see 
Chapter 8). 


The binary program is loaded using the Absolute Loader, as 
described in Appendix D. Since the user program ends with a 
transfer address of 52 (see Chapter 8 for EXF program requirements), 


BASIC is signalled when the load is complete and prints: 


READY 


If the user program is on more than one tape, only the 


last may contain the transfer address. 
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CHAPTER 8 


USING ASSEMBLY LANGUAGE PROGRAMS WITH BASIC 


NOTE 


The user must be familiar with the PAL-11A 
Assembler and assembly language as described 
in the PDP-1ll Paper Tape Software Programming 
Handbook, DEC-11-GGPA-D, and the PDP-1ll Hand- 
book 1970. 


8.1 DESCRIPTION 


The BASIC function call, EXF, when written as any other function 
within an expression, serves to link the user's BASIC program 
and a PAL-11A assembly language program coded for compatibility 


with BASIC and resident in core. 


When BASIC encounters the EXF function call it passes con- 
trol to the assembly language program, which can, in turn, "borrow" 
BASIC's internal routines, such as ITOA (Integer-TO-ASCII) or 
EVALuate. 


The EXF function call can be used as an expression, or as 
an element of an expression, anywhere that an expression is legal 
in BASIC syntax: 


10 LET X = EXFCXK+5) 
or 
1@ PRINT Xs EXFCX) 


8.1.1 Format of Function Call 


The external function is called with its three-letter mnemonic 
followed by a parameter list in parentheses. For example, consider 


the following. 


EXF C2) 
EXFCSINCX+5)) 
and 


EXFCXt2sXYs BC#EsA*Y) 


tonce in core, the external program can only be deleted by re- 
loading BASIC. 
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are all valid forms of the EXF function. 


The EXF call is always to the same external program. How- 
ever, the external program may have several entry points to per- 
form differing functions. Designators for such entry points may 
be in the parameter list following the function call name 
anywhere except as the first parameter. The external program must 


recognize and utilize such entry point designators. 


8.1.2 Evaluation 


Before yielding control to the external program, BASIC evaluates 
the first item of the parameter list. The value is stored, and 


register RO is set to point to its storage location. 


Rl is set to point to the comma following the first argument, 
or, if there is only one argument, to the character following the 
final parenthesis (to facilitate return to the BASIC program when 


EXF has completed execution). 


It is the user's responsibility to evaluate and use any argu- 
ment after the first. However, if any of the remaining arguments 
are valid BASIC expressions, the BASIC subroutine EVAL can be GOR 


called from the external program to evaluate them. 


To illustrate, the sample EXF calls in Section 8.1.1, above, 


will be used. In the first example: 
EX C2) 
no evaluation is necessary. The value 2 is placed in a storage 


location and RO is set to point to it. 
In the second example, 
BAP CSN CK SD 
SIN(X+5) will be evaluated and stored as above. 
In the third example, Xt2 will be evaluated and Rl will point to 
the comma between X*t2 and XY to allow the external program to pick up 


the remaining parameters. XY and BC#@ are not valid BASIC expressions 


and must, therefore, be dealt with by the user program. The final ae 


parameter, A*Y, is in legal BASIC terminology: The BASIC subroutine 


EVAL can be called to perform the evaluation (see Section 8.3.1). 


8.1.3 Recursive EXF Calls 


EXF calls of the form: 
EXE CEXKFCX)) 


are acceptable. The EVAL routine is recursive (as are all of BASIC's 


internal functions) to allow recursive function calls. 


Statements of the type above, however, will cause the ex- 
ternal function to be re-entered before the first call is complete; 
the external function must also be re-entrant if this type of call 


is utilized. 


8.2 REQUIREMENTS FOR THE EXTERNAL ROUTINE 


1. The binary routine must be loaded into the highest 
memory available to the user program. For example, 
a routine 50 bytes long which is to be loaded 
into an 8K sb8tem would start at location 37410 
Since it is required to end at location 37472. 
This allows BASIC to properly set up its stack and 
user program area. 


The upper limit for routines in all configurations is as fol- 


lows: 


Core Size Highest Free Location 

4K 17472 

8K 37472 
12K 57472 
16K 77472 
20K 117472 
24K 137472 

28K 157472 

2. The first word of the routine must be the starting 


address (entry point) of the routine. 


3. The address of the first word of the routine must 
be loaded into location 50. This may be done when 
the routine is assembled with PAL-11A by placing 
the following lines of code at the beginning of the 
user routine; assume label SEXF is the entry point 
of the external routine: 


-=59 ;REFERENCE LOCATION 59% 
~WORD SEXF ;STORE FIRST WORD ADDRESS 


4. The transfer address must be specified as follows: 


~-END 52 


If more than one tape comprises the routine, only the last 


tape loaded should have a transfer address. 


5. All exits from the user routine should be in the 
form of a jump to location 52. 


6. A user routine may place items on the stack for 
temporary storage as long as they are removed be- 
fore exit. The one exception is that upon exit 
from the user routine the top of the stack must 
contain the function value in 3-word floating- 
point format. 


7. Upon entry to the function, the parameter list 
evaluation is as follows: 


a. RO contains the address of the numeric 
value (3 word floating point) of the 
first parameter which has been previously 
evaluated by BASIC. 


b. Rl points to the comma following the 
first parameter or, if there is none, to 
the character following the closing paren- 
thesis. 


Item b, above, allows the programmer to specify arguments in 
addition to the one evaluated by BASIC. 


8. Upon exit, register Rl must point to the charac- 
ter immediately following the closed parenthesis 
which ends the function call, and register R5 
must be restored. 


The user must define and interpret all of the parameters fol- 
lowing the first, and assure that a closed parenthesis exists for 


the function call. 


It is not recommended that the EXF function be used in less 
than an 8K PDP-1l system, unless all optional BASIC functions are 
deleted. The user area will be reduced in size rather excessively 


by the EXF function (see Appendix A). 
WARNING 


It is up to the programmer to assure that storage 
overflow does not occur. Upon entry to the EXF 
routine, R5 points to the highest address current- 
ly in use by BASIC. The programmer must check to 
make sure that when he uses the R6 stack that he 
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never overflows the area used by BASIC (R6 may 
never contain a lower address than R5). This 
overflow condition must be checked every time 
EXF is used, Since the BASIC storage is dynamic-— 
ally used and changes often. 


8.3 USING BASIC'S INTERNAL ROUTINES FROM "EXF" 


8.3.1 EVAL 


The programmer may use BASIC's EVAL function to evaluate arguments 


in a parameter list of the following rules are followed. 


1. The parameter to be evaluated must follow all 
the rules for a normal BASIC expression. 


2. EVAL must be called once for each parameter to 
be evaluated. 


3. A parameter must be followed by a comma or a 
right parenthesis. 


Calling EVAL is done using a TRAP call with the value 104536. 
Upon entry to EVAL, Rl must point to the start of the character 
string to be evaluated and R5 must have, or be restored to, the 


same value it had when the EXF routine was entered by BASIC. 


Control will be returned to the user routine at the instruc- 
tion following the EVAL call. 


Registers 2, 3, and 4 will contain the value of the expres- 
Sion. Register 1 will contain the address where the scan failed 
(a comma causes a scan failure, and is therefore an effective de- 
limiter). If the scan fails on any character other than a right 
parenthesis, Rl will point to the character where the failure 
occurred. If the scan ended on a right parenthesis, Rl will point 
to the character following the parenthesis and the V (overflow) 
bit in the status register will be set. If the V-bit is set on 
any parameter other than the last or is cleared on the last para- 


meter, a mismatched parenthesis error has occurred. 
Errors may occur in the evaluation as follows: 


1. If a parenthesis (other than the special case men- 
tioned above) is missing or improperly placed in 
an expression to be evaluated, a fatal error call 
is made from EVAL. The user routine will not re- 
gain control. 


2. If a storage overflow occurs due to an evaluation, 
a fatal error call is made. The user routine will 
not regain control. (See Appendix A.6.) 


3. If a non-existent variable is referenced, the value 
of the non-existent variable is assumed to be zero 
for the evaluation, and the user routine will regain 
control normally. 


When EVAL is called, all registers are used. 


The EVAL routine is fully recursive to allow nested function 


calls. However, care must be taken when using calls of the form: 
BAD CE XE CK) 


Since the EXF function will be re-entered a second time before 
the first call is complete (the EXF function must also be re- 
entrant). Also, deep nesting can cause an overflow if the avail- 


able user storage is minimal. 


8.3.2 Other Routines Available to the User 


The following routines are also available to the user routine. For 


interface information, see Table 8-1 below. 


ATOF - Convert ASCII string to floating-point number 
ATOL = Convert ASCII string to integer number 
ITOA = Convert integer to ASCII string 

IMUL = Integer multiply 

ADDF - Floating-point addition 

SUBF = Floating point subtraction 

NEGF - Floating-point negative 

DIVF - Floating-point divide 

MULF = Floating-point multiply 

CMPF = Floating-point compare 

FIX ae Convert floating-point number to integer 
FLT “ Convert integer to floating-point number. 


Additional routines in BASIC may be used only if the program- 


mer becomes extremely familiar with the internal BASIC structures. 


Do not use the routines GTOPR or GETOP as they are used by 


EVAL and they, in turn, use EVAL in a recursive fashion. 
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NAME 


| ATOF 


ATOIL 


ITOA 


IMUL 


ADDF 


SUBF 


NEGF 


DIVF 


MULF 


CMPF 


FIX 


FLT 


TRAP 
CALL 


18446 


194419 


194412 


194416 


184429 


184422 


194424 


194426 


194439 


194434 


194449 


184436 


TABLE 8-1 


INPUT 


Pointer to ASCII 
String in Rl 


Pointer to ASCII 


Number in RI 


Numbers in R@ 
and Rl 


Pointers to num- 


Pointers to num- 
bers in R@ and RI 


Pointer to number 
in Rl 


Pointers to num- 
bers in R@ and Rl 


Pointers to num- 
bers in R@ and RL 


Pointers to num- 
bers in RM and R1 


Number in R2, R3, 


R4 


Number in RL 


Usage Data for BASIC Functions 


OUTPUT 


3-word F.P. Number 
stored where Rg 
pointed at entry. 
Rl points to lst 
illegal character 


Number in RY. Rl 
points to first 


illegal character 


Pointer to output 
area in RQ 


High order in R@ 
Low order in Rl 


Result where RG 
pointed at entry 


Result where R@ 
pointed at entry 


Result where R@ 
pointed at entry 


Result where Rg 
pointed at entry 


Result where Rg 
pointed at entry 


Same condition 
codes as CMP in- 
struction. 


Result in RQ 


Result where RG 
pointed at entry 


REGISTERS 


RG, 


USED 


ALL 


ALL 


ALL 


ALL 


ALL 


ALL 


ALL 


ALL 


ALL 


ALL 


R2; 


RY-R4 


RO; 


R4 


CHAPTER 9 


DEMONSTRATION PROGRAMS 


The following programs illustrate some typical BASIC instruction se- 
quences and, additionally, provide models for some useful program 
types, e.g., loan payment computation and measurement conversion. 


Some of the programs were typed into core and LISTed for inclusion 


below. 
Program 1: 


This program illustrates the use of the comma and semicolon 
in PRINT statements. Also at line 30, the PRINT statement is 
used without a variable list to insert a blank line in the print- 
out. 

1ST 

> REM ~- USE OF CONTROL CHARACTERS IN "PRINT". 
19 READ A>s Bs C 

OO PRINT A» Bos Cs Ates Btes cre 

30 PRINT 

40 PRINT As Bs Cs At®3 Brees Cre 

59 DATA 2s As 6 

99 END 

READY 

RUN 


a 4 6 z 1é 
36 ) 


e 4 6 4 16 36 


STOP AT LINE 2 
REALY 


Program 2: 


A program to compute grade averages. Line 40 to 120 (FOR- 
NEXT statements) form a program loop. Within this loop, lines 
75 to 90 form an inner nested loop. Note lines 100 and 130 


where computations are performed within PRINT statements. 


Lis 


1@ 
eae) 
32 
35 
AG 
52 
67) 
TO 
T> 
7 
85 
90 
1Ge 
105 
110 
len 
P30 
140 
REA 


RUN 
HOW 
ok 


T 
REM - PROGRAM TO TAKE AVERAGE OF STUDENT GRADES AND CLASS GRADES. 
PRINT "HOW MANY STUDENTS>s HOW MANY GRADES PER STUDENT'S 
INPUT As 5B 
LET V = @ 

FOR J = 1 TO A 

PRINT "STUDENT NUMBER TS “o> og 

PRINT “ovr “GRavpEss* 
LET M = @ 

FOR K = {| TO B 

INPUT. -"G 
Lae A ee 
NexT K 

PRPINT "AVERAGE GRADE IS2 "3s M/B 

PRINT 

LET V = Vt™M/B 

NZAT J 

PRINT “CLASS AVERAG® IS: '"'s V/A 

EN D 

DY. 

MANY STUDENTS» HOW MANY GRADES PERK STUDENT? 3s 4 

DENT NOMBER IS: 1 


— 


ENTIER GRADESS 


orUDENE 
ENTER GRADESS 


272 


287 


22 
276 


AVE 


ao 


mY Novy vy EF] WY 
TT) PS 1D POOR 


RAC * 


RAGE 


GRADE ISs 86 


NUMBER IS: ‘a 


GRADE [Ss 53<«25 


GRADE 5:3 8 


CLASS AVERAGE 1588 74¢75 


STO 


Po eer 


READY 


LINs 149 


“™\ 


Program 3: 


This program provides an algorithm for computing roots. 
Extra spaces in the formatting of lines 30 to 70 have no effect 


on program execution. 


IQ PRINT “NUMBER: "SQUARE. ROOT's "CUBE ROOTS "FOURTH ROOT 


ef FOR N = 1 TO 12 

32 PRINT N> 

40 FOR R= 2 TO 4 

30 PrINT NtC1/R)> 

60 NEXT R 

79 Pron. 

609 NEXT N 

99 END 

RUN 

NUMBER SQUARE ROOT UBE ROOT POUR CH ROOT. 
i 1 1 1 

ras 12414214 16259921 1.189207 
S 126732951 11-4425 1-316974 
4 C 1¢5387491 16414214 
5 2°236068 1-709975 12495349 
6 2044949 1e817121 1265658435 
7 2e645751 16912931 16626577 
8 2e82esg4eT a 1.681793 
g S: 22 OSABS34 1e7329051 
1G 3-¢162278 2e 154435 1e778279 


oTGP AT LINE 99 
READY 


Program 4: 


At line 20, the 

READ statement associates the first data element in line 90 with the 
(1), 
next variable, X, in the READ statement in line 30. 


This program illustrates the use of RESTORE. 


variable N. The next data element in line 90 1S assigned to the 
The program 
iterates three times more through the loop formed by statements in 


lines 30 and 60, printing the remaining values in lines 90 and 95. 


At line 65 the DATA statement pointer is reinitialized. 
Therefore the first constant in the reinitiated DATA list, 4, 
is available when the "READ X" statement is executed. This 
value is printed out and the program iterates three more times 
through the FOR...NEXT loop in statements 80 and 86, printing 


out the succeeding three values in lines 90-95. 


10 REM - PROGRAM TO ILLUSTRATE USE OF RESTORE. 
C0 READ N 

25 PRINT “VALUES OF XK AREs" 

39 FOR I=1 TO Ns: READ X: PRINT Xs; 

62 NEXT I 

65 RESTORE 

1d PRINT? PRINT “SECOND LIST OF xX VALUES AREs™ 
71 PRINT “RESTORE STATEMENT USED HERE." 

60 FOR I=1 TO Ns READ Xs: PRINT Xs; 


85 NEXT I 
90 DATA 4s 1s 2s 33 4 
99 END 
RON 
VALUES OF X AREs: 
1 a 3 4 


SECOND LIST OF X VALUES ARE? 
RESTORE STATEMENT USED HERE. 


4 1 2 3 
STOP AT LINE oo 
READY 


Program 5: 


This program utilizes the INTeger function at line 25, 
to round off to integer notation the computed value of the 


variable B. 


1 REM -- AN EXAMPLE OF THE "INT" FUNCTION. 

2 REM --- BASIC WILL CONTINUE TO ASK FOR THE NEXT 

3 REM --- NUMBER TO BE ROUNDED. THERE IS NO "END" 
4 REM === STATEMENT « 

> REM --- TYPE CTRL/P TO TERMINATE THE PROGRAM. 

120 PRINT 

1S: PRINT “NUMSER TO BE ROUNDED? "s INPUT A 


ea PRINT "NO- OF DECIMAL PLACES?:"'s INPUT D 
eo LET B = INTCA*1901D+-5)/191tD 

30 PRINT "A ROUNDED =" B 

35 GOTO 12 


RUN 


NUMBER TO BE ROUNDED: 
2 5565642 

NO-« OF DECIMAL PLACES: 
are 

A ROUNDED = 55-66 


NUMBER TO BE ROUNDED: 
2? 67+89 

NO. OF DECIMAL PLACES: 
? Q 

A ROUNDED = 68 


NUMBER TO BE ROUNDED: 

2 782375 

NO+ OF DECIMAL PLACES: 

o.oo 

A ROUNDED = 78-4 (continued on next page) 


NUMBER TO BE ROUNDED: 
2 78.375 

NO. OF DECIMAL PLACES: 
2-3 

A ROUNDED = @Q 


NUMBER TO BE ROUNDED: 
2? 782375 

NO~ OF DECIMAL PLACES: 
24 

A ROUNDED = 78-375 


NUMBER TO BE ROUNDED: 
21P 
READY 


Program 6: 


This program uses the INT function in testing for the largest 
factor of a given number. Since it starts with a value greater 
than that of the largest possible integer and works downward, 
the first number which qualifies as a factor will also be the 


largest factor. 


5S REM - BASIC WILL PAUSE WHEN CALCULATING 
6 REM - THE LARGEST FACTOR. 

10 PRINT "NUMBER". "LARGEST FACTOR" 

cD FOR N = 1021 TO 1@28%8 STEP 2 

349 PRINT Ns 

4A FOR F = INTCN/Z2) TO 1 STEP -1 

98 IF N/F <> INTCN/ZF) THEN 82 

6@ PRINT F 


76 GOTOQ 9Q 

69 NEXT 

90 NEXT N 

99 END 

RON 

NUMBER LARG#ST FACTOR 
1991 143 
1903 39 
1005 335 
1QO07 a3 
1029 1 
LOL 337 
1913 1 
1Q15 203 
1017 339 
1Q19 1 


STOP AT LINE 99 
READY 


Program 7: 


This program converts metric length measurements to feet. 
By substituting an INPUT statement for the DATA and READ state- 
ments in lines 100, 240, and 250, the program could be converted 


to an on-line calculator program. 


100 READ M,C 

110 LET M1 = M+C/190@ 

120 LET I = M1*39-37 

P30. “LET: TNICi7 Te) 

140 LET I = I-12*F 

159 PRINT Ms»"METERS»s "sCs "CENTIMETERS" 
16". PRINT. sONVERTS: Os? 

170 IF F = @ THEN 19@ 

180 PRINT Fs "“FEET,"s 

19D PRINT. Lo “LNGHES” 

C08 PRINT 

22g GOTO 148 

C40 DATA 1s @ 

C28 DATA Os 2-545 Bs 605 2s 5 


COO END 
RUN 

1 METER Ss 4 CENTIMETERS 
CONVERTS “£08 

3 FEET, 3-37 INCHES 

O METERS; 2054 CENTIMETERS 
CONVERTS “TOs 

999998 LNCHES 

0 METERS» 60 CENTIMETERS 
CONVERTS TOs 

1 PERICT » 11-622 INCHES 

Yan METERSs, a) CENTIMETERS 
CONVERTS TO: 

6 FEET» 67085 INSHES 
ERROR eG AT LINE 100 
READY 


Program 8: 


The use of subroutines is illustrated here. GOSUB is con- 
tained in line 80 and RETURN in lines 160, 190, and 210. 


There are three paths through the program; which one is 
taken depends upon the number of possible solutions to the quad- 
ratic equation. Program switches, operated through logical 


tests, are contained in lines 140 and 170. 


L “REM = THis PROGRAM ILLUSTRATES. “GOSUB™ AND: *RETURN''s 
a AEN SS AS WELL AS CERTAIN MATHEMATICAL FUNCTIONS. 
1@ DEF FNACX) = ABSCINTCX)) 

2O@ INPUT As Bs C 

30 GOSUB 102 

4Q LET A = FNACA): LET B = FNACBR): LET C = FNACC) 

76 PRINT 

89 GOSUB 102 


90 STOP 
1G REM == THiS SUBROULINE- PRINTS THE: ‘SOLUTIONS -OF 
Lol REM == EQUATION AXt2 + BX + C = Ge 


120 PRINT “THE: BOUATION Loe "AM ex tO se MMe a TE 
1320 LET D = B*B-4*Ax*C 

140 IF D<>@ THEN 172 

15@ PRINT “ONLY ONE SOLUTION* XK =" =<B/C2*xA)D 

169 -RETURN 

170. - TE De THEN: 200 

180 PRINT "TWO SOLUTIONS:'"'s PRINT 


165 PRINT "X="" €-B+SQRCD))I/02*A) " AND" 
186. PRINT “X="" €=-B-SQRCD))/( 2*A) 
190 RETURN 


e002 PRINT "IMAGINARY SOLUTIONS:"': PRINT 

281 PRINT "X= €'" -B/C2*A) "5" SQRC-D)I/C2*A) ") AND" 
e203 PRINT "X= C€" -B/C2*A) "5" -SQRC-D)I/C2*A) ")" 

210 RETURN 

300 END 


RUN 

21s 65s -25 

THE EQUATION IS: 1 *XT2O + ¢€5 *X + - 25 
TWO SOLUTIONS: 


X= dD AND 
X=- 1 


THE ‘EQUATION: IS PERT to A ER eed 
IMAGINARY SOLUTIONS: 


» 1) AND 
a 


A= € @ 
X= € @ 
STOP AT LINE 90 
READY 


RUN 

22s As 6 

THE EQUATION IS: e *XtTC + A KX + 6 
IMAGINARY SOLUTIONS: 


A= C-1 5 16414214 ) AND 
X= C-1 5-1-414214 ) 


THE EQUATION IS: eC *XTOC + A *X + G6 
IMAGINARY SOLUTIONS: 


X= C-1 5 146414214 ) AND 
X= C-1 5-1-414214 ) 


STOP AT LINE 90 
READY 


This program computes the amount of interest, principal, 


balance and monthly payments for a given loan. It employs a 


user-defined function in line 5 and a DiMension statement in 


line 10. 


10@ 
101 
183 
104 
meee KS E0) 
106 
111 
rie 
ils 
11D 
120 
Les 
126 
130 
142 
15% 
160 
182 
190 
193 
196 
197 
mel & 
wet 9D 
20D 
21 
els 
216 
el7 
21s 
22W 


DEF FNT(X) = INTCX*109+-5)/102 


DIM P 
FOR I 
READ 

NEXT 

PRINT 
PRINT 
INPUT 
FOR I 
LF L 

NEXT 

LET oR 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
|B os 
LET 
LET 
LET 
LET 
Ler 
sR a 
EE. 
iF 1, 
LET Q 
LET L 
PRINT 
IF L 

PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
S10FP 
DATA 
DATA 
DATA 
DATA 
END 


Tanonanp 


C20) 

= 1 TO 2@ 
PCI) 

I 


"ENTER AMOUNT OF LOAN ''s3 
is 

= 1 TO 2@ 
<= PCI) THEN 102 

I 

= 5+5x*I 


"MONTHLY PAYMENT =5"'3R 


"PINANCE'S "APPLIED TO"; "CLOSING" 
"CHARGE", "BALANCE", "BALANCE" 

= L 

= @ 

= @ 

= eQ1x*L 
= h-F. 
= T+F 

= Ntl a 
=: 1-0 

@ THEN 182 

= L+R 

= @ 

FNTCF),s FNTCQ)5 FNTCL) 
> Q@ THEN 115 

: PRINT 


> 


N; "PAYMENTS" 

"TOTAL FINANCE CHARGE =5$" FNTCT) 

"OVERALL % OF LOAN ="' FNTCT/ZA*100)35 "2" 

"PERSONAL LOAN EQUIVALENT =" FNTC12*T/ON*A) *100)3 "CR" 


2005 3005 ABBs 5O0O» 720s 8405 960s 10805 1200 
13205 144905 15605 16805 1800s 1920> 29403 2160 
2288s 2400 

1E 100 


—— 


RUN 


ENT 


ER AMOUNT OF LOAN ?12@ 


MONTHLY PAYMENT =5 12 


FINANCE APPLIED TO CLOSING 

CHARGE BALANCE BALANCE 
1 9 91 
°91 9-9 61-91 
°&2 9-18 72073 
°73 9-27 63-46 
°63 9-37 54-09 
054 9-46 144663 
045 9-55 35-8 
© 35 9-65 25-43 
025 9-75 15-68 
~ 16 9-84 5-84 
°06 509 Ci 
11 PAYMENTS 

TOTAL FINANCE CHARGE =$ 5-9 


OVERALL 2 OF LOAN = 5-9 % 
PERSONAL LOAN EQUIVALENT = 6-43 & 


STO 


P AT LINE 2120 


READY 


Program 10: 


A DIMension statement at line 20 initializes and reserves 


storage for 


A represents a one-dimensional, and variable B a two-dimensional, 


array. 


1d 
15 
ran) 
2D 
30 
35 
AQ 
AS 
1 
35 
6 
65 
710 
75 
8 
65 
90 
99 


the values of two subscripted variables. 


REM -- PROGRAM DEMONSTRATING READING OF 
REM -- SUBSCRIPTED VARIABLES. 
DIM AC5)5 BC2s 3) 


PRINT "ACI) WHERE A=1 TO 53" 
FOR I = 1 TO 5 

READ ACI): PRINT ACI)5 

NEXT I. 

PRINTS PRLNT 

PRINT "BCI,J) WHERE I=1 TO e2" 
PRINT " AND J=1 TO 3:3" 
FOR I = 1 TO @: PRINT 

FOR J = 1 TO 3 

READ BCI5,J): PRINT BCIsJ)35 
NEXT Js NEXT I 

DATA 135 25 35 4s 5s 

DATA lls 125 135 215 225 23 
PRINT 

END 


Variable 


RUN 
ACI) WHERE A=1 TO 5: 
Ll 2@ 38 4 5 


BCI,J) WHERE [=1 TO @ 
AND J=1 TO 3: 


11 lf. I3 
al) wee 23 


STOP Al GINE a9 
READY 


Program ll: 


The DIMension statement in line 20 forms a 7 by 11 data 
array. Values are assigned lines 45 and 50 to column 0O and 
row 0; the remaining values are zero. The array is printed 


out utilizing two loops within lines 55 to 70. 


10 REM -- A MATRIX CHECK PROGRAM. 
20 DIM AC63 10) 

25> FOR I = @ TO 6 

38 FOR J = @ TO 10: LET ACI;J) = @ 
35 NEXT J 

AO NEXT I 

45 FOR I = @ TO 6: LET ACI;@) 


{ 
HH 


9@ FOR J = @ TO 16: LET ACO@sJ) = J 
SS PRINT ACI>,J)3 
60 NEXT J 
65 PRINT 
70 NEXT I 
7S END 
RUN 

® 1 e 3 4 5 6 7 & 9 14 
1 @ ®@ ®©® @6@ 0 @6 G6 GB GB B 
eo 8 868 @ 6 6 6B G6 GB GB B@ 
3 0@ @ 86 868 @ @ G@ GB BO @ 
4 2 6 6 @ ® 09 68 G6@ OBO @ 
> © © @ @ 68 868 6 B B @ 
6 0 86 808 @ 868 8 B68 G6 BO B@ 


StOP AT LINE 79S 
READY 


APPENDIX A 


IMPLEMENTATION NOTES 


A.1l COMPARISON WITH DARTMOUTH BASIC 


BASIC as implemented on the PDP-11 corresponds with Dartmouth 
BASIC except as noted below. 


A.1.1 Special Features 


1. Use of BASIC statements in immediate mode. 


2. Ability to use any BASIC command (RUN, LIST, etc.) 
in deferred mode (with a line number). 


3. Recursive subroutine calls. 


4. User programs can be halted (with CTRL/P) without 
clearing of variables. These can be examined with 
the PRINT statement. 


5. Multiple statement lines. 


6. Array names consisting of a letter followed by a 
number. 


A.1l.2 Restrictions 


- No TAB function in PRINT. 
é No ON statement. 
No MATrix operations. 


. No character string manipulation. 


Oo Ff W ND FF 


- All array variables must be declared in a DIM state- 
ment before being used. 


6. No expressions of the form (-A)+tB. The variable A 
must be positive and non-zero. 


A.2 USER STORAGE REQUIREMENTS 


BASIC can be run in the minimal 4K PDP-11/20 configuration. With 
the BASIC program in core, and deducting space reserved for the 
Bootstrap and Absolute Loaders, approximately 450 words are left for 


total user storage (program storage plus working storage). 


Any additional 4K core memory increments are available for user 


storage unless restricted at load time (see Chapter 7). A 12K 
configuration would normally provide 8K plus approximately 450 


words of user storage. 


1 approximately 1000 words are available if BASIC's arithmetic 
functions are deleted at load time. 


A-1 


A.3 FACTORS AFFECTING PROGRAM SIZE 


BASIC statement names (LET, PRINT, etc.) are stored as single byte 


codes with values ranging from 140 to 174 They are reconstructed 


3° 
for output. Any spaces typed within statement names are ignored, 


e.g., LE T is accepted as LET. 


The text of a user program is stored two characters per 
word. Beyond the space requirement for statement names and 


text, BASIC program size is dependent on the following: 


- The number and size of arrays. 
- The number of nested FOR loops. 
The number of nested subroutines, 


- The number of variables, 


Om & W NO 


- The number of user-defined functions. 


Storage required by the above numbered elements can be 


estimated as follows: 


1. Each array requires a two-word entry for the 
array identifier and three words of storage 
for each array element. 


2. Each FOR-NEXT loop requires eight storage 
words. This space is returned as each loop 
finishes cycling. 


3. Each subroutine requires one word during 
operation. 


4. Each simple variable (one- or two-character) 
requires five storage words. 


5. User-defined functions require three storage 
words plus the number of words required for 
the function definition. 


A.4 IMMEDIATE MODE STATEMENTS 


The following BASIC statements can be executed in immediate mode: 


LET INPUT 
PRINT GOTO 
READ GOSUB 
RESTORE RETURN 


The LET, PRINT, and INPUT statements can be used independently 
to perform on-line calculations. The remaining statements, however, 
are used in debugging deferred mode programs and executing them in 
special ways (GOTO, for example, can be used to begin program execu- 


tion at a point other than the first statement). 


A.5 COMMANDS IN DEFERRED MODE 


PDP-11 BASIC makes no distinction between statements, such as LET 


and DATA, and what are usually classified as commands, e.g., RUN, 


LIST, etc. All statements in the command category (RUN, LIST, DELETE, 


SAVE, and OLD) can be coded in deferred mode, i.e., with a preceding 
line number. When a deferred mode command is encountered in a user 

program it is executed and BASIC returns to command mode. RUN is an 
exception: it causes a program to be re-executed from the lowest 


numbered statement each time it is encountered. 


A.6 STORAGE OVERFLOW 


Storage overflow can be caused by a user program being too large or 
generating more data than can be stored in the program storage area. 


An overflow is indicated by error code 0; a fatal error. 
Storage overflow can be caused by any of the following. 


1. Too many variables and/or arrays. 

2. Too many nested FOR-NEXT loops, 

3. Illegal use of the DEF statement. For example: 
18 DEF FNA(X) = X+2 + FNA(X) 


which causes an infinite amount of storage to 
be required whenever FNA is used in an expres- 
Sion. 


4. Excessive nesting of GOSUB statements. For 
example: 


10 LET Y = 1 
20 INPUT X 
3@ GOSUB 100 


4@ PRINT Xs "! ="3 yY 
5@ STOP 
90 REM -- CALCULATE X FACTORIAL. 


190 LET X = X-1 

11@ IF X>1 THEN GOSUB 18@ 
120 LET Y = Y*X 

13@ LET X = X+1 

1490 RETURN 

150 END 


RUN 
? 10 
1@ ! = 3862882 


STOP AT LINE 2G 
READY 


RUN 
24500 


ERROR © AT LINE 112 
READY 


The program above ran successfully until the value assigned to X 


became so large that more data was generated than could be stored, 


causing the fatal error condition. 


order to conserve space to allow a program to execute proper- 


following actions should be taken. 


Remove all excess spaces within the program. Since 
Spaces are ignored in BASIC, they do not affect the 
operation of the program, only its reading ease for 
the user. For example: 


LOL TY=1 
COINPUTX 


etc. 

Remove all REM statements. REM statements consume 

core and are not executed, hence they can be eliminated 

to make room for executable statements. 

Use multiple statement lines. Statements can be com- 

bined on a Single line, separated only by a colon, 

thereby eliminating the extra character spaces con- 

sumed by the line numbers and spaces. For example: 
LeOLETY=Y*X3sLETX=X+t1 


instead of: 


ao: LEAT YY. = “Yorn 
130 LET UA = AF] 


Use subroutines and user-defined functions to perform 
repetitive processes instead of duplicating groups 

of statements throughout the program. This is especial- 
ly important for long programs. 


Use common expressions to eliminate the need to cal- 
culate the same values more than once. For example: 


1O@LETZ=At+B* C3 LETY= 3*Z- &2*Z 
instead of: 


IOLETY=3* CA+B*C)-2* CA+B*C) 


6. A final alternative would be to segment the program, 
1.e., make two or more programs out of the one pro- 
gram. 


Storage overflow can cause the latter portion of the user program 


to be destroyed. For example, consider the following (we use an 


illegal DEF statement to produce an infinite amount of storage to be 


required and three RESTORE statements to represent subsequent program 


statements). 


19 DEF FNACX) = Xte + FNACKX) 
e9 PRINT FNACQ9) 

30. RESTORE 

4Q RESTORE 

oo “RESTORE 


RUN 


ERROR Q@ AT LINE a 
READY 


which causes an infinite amount of storage to be required whenever 


FNA is used in line 20. 


After an overflow, LIST the program to determine whether it 


is still intact. 


List 


1@ DEF FNACX) = X12 + FNACX) 

22 PRINT FNAC9) 

3@ RESTORE 

4Q@ RESTORE 

8&ASV&@<HD& SHBREM t P (CTRL/P was typed here) 


Dp 


a 
READY 


If the program already exists on paper tape (it has been pre- 
viously SAVEd), then reload it with the OLD command. Otherwise, 
lengthy programs should then be SAVEd and then read in using the 
OLD command (OLD restores core), or, if the program is not too 


large, restart BASIC at location zero (which also restores core) 


and retype the program. 


When the program is SAVEd on the low-speed punch, the punch 
may be stopped as soon as the garbled text starts listing on the 
teleprinter. If the high-speed punch is used, you must wait for 
the punch to stop since there is no visible means to see when the 
incorrect text starts. However, the OLD process will stop with an 


error message as soon as the incorrect text is encountered. 


After reading in or retyping the program, it can be modified as 
suggested above so that it requires less core or generates less data. 


In addition, any missing statements must be retyped. 


A.7 EXPONENTIATION 

As long as the extended functions (in particular, LOG and EXP) have 
not been deleted, PDP-11 BASIC always performs exponentiation with LOG 
and EXP. Thus, small inaccuracies are introduced even if an integer 
is being raised to an integral power. For example: 


PRINT ete-4 
922351 74E-7 


shows that 242 is calculated as 
4.00000002235174 
This will cause the following program to run as shown: 


10 IF ete = 4 THEN 20. 
11 STOP 

20 STOP 

RUN 


STOP AT LINE 11 

READY 
Since 2t2 is not exactly calculated as 4, the THEN 20 portion of the 
IF-THEN is not executed. However, the statement PRINT 2+t2 will print 
a precise 4 as a result. This is because at most eight decimal places 


are printed and, to this precision, 2+2 is 4. 


If this problem arises, there are several methods available for 
coping with the proglem. If an integer is being raised to an integer 
power, use INT to discard the fractional part: 

10 IF INTCet2) = 4 THEN 2@ 
LL STOP 


28 STOP 
RUN 


STOP AT LINE 20 
READY 


Another method is to do an "almost equal" compare by writing an IF 


as: 


IF ABS(XtN-Y) <= .1E-6 THEN 20 


APPENDIX B 


STATEMENTS, COMMANDS, FUNCTIONS 


B.1l STATEMENTS 


Statement 


LET 


READ 


DATA 


PRINT 


GOTO 


IF THEN 


IF-GOTO 


FOR-TO 


NEXT 


DIM 


Example of Form 


LET Sl = expression 


READ V1,V2,...,Vn 


DATA N1,N2,...,Nn 


PRINT {list} 


GOTO n 


IF Sl r S2 THEN n 


IF Sl r S2 THEN stmt 


IF Sl r S2 GOTO n 


FOR V=El to E2 STEP E3 


NEXT V 


DIM V(S) 


Explanation 


Assign the value of the expres- 
sion to the variable Sl. 


Variables Vl through Vn are as- 
Signed to the value of the cor- 
responding constants in the 
DATA string. 


Constants Nl through Nn are to 
be associated with correspond- 
ing variables in a READ state- 
ment. 


Output elements of list to Tele- 
type in accordance with format 
control characters (, or ;); 
evaluate expressions, if any, 
and print constant values. 


Transfer control to line n and 
continue execution from there. 


If the relationship r between 
the formulas or constants Sl 

and S2 is true then transfer 

control to line n, or execute 
the statement; if not, con- 

tinue in regular sequence. 


Same as IF-THEN n. 


Used to implement loops; the 
variable V is set equal to the 
expression El. From this point 
the loop cycle is completed fol- 
lowing which V is incremented 
after each cycle by E3 until 

its value is greater than or 
equal to E2. If STEP E3 is 
omitted, E3 is assumed to be 

cee 


Used to return to the FOR state- 
ment and execute the loop again 
until V is greater than or equal 
to E2. 


Enables the user to create a 
table or array with the speci- 
fied number of elements where 

V is the variable name and S 

is the maximum subscript value. 
Any number of arrays can be di- 
mensioned in a single DIM state- 
ment, separated by commas. (S 
starts at 0). 


Statement 


GOSUB 


RETURN 


RANDOMIZE 


INPUT 


REMARK 


RESTORE 


DEFINE 


STOP 


END 


B.2 EDIT AND CONTROL COMMANDS 


APPENDIX B (Cont'd) 


Example of Form 


GOSUB n 


RETURN 


RANDOMIZE 


INPUT. V1,V2,4«.;,Vn 


RESTORE 


DEF FNA(X) =F (X) 


STOP 


END 


Explanation 


Allows the user to enter a sub- 
routine at several points in the 
program. Control transfers to 
line n. 


Must be at the end of each sub- 
routine to enable control to be 
transferred to the statement fol- 
lowing the matching GOSUB. 


Enables the user to obtain an 
unreproducible random number se- 
quence in a program using the 
RND function. 


Causes typeout of a ? to the user, 
waits for the user to supply the 
values of the variables Vl through 
Vn. 


When typed as the first three 
letters of a line allows typing 
of remarks within the program. 


Sets pointer back to the begin- 
ning of the string of DATA 
values. 


The user may define his own func- 
tions to be called within his 
program by putting a DEF state- 
ment at the beginning of a pro- 
gram. The function name must 
begin with FN and have three 
letters. The function is then 
equated to an expression F(X) 
which must be only one line long. 
Multiple arguments are not 
allowed. 


Halts program execution (BASIC 
prints STOP AT LINE xxx and READY. 


Last statement (highest numbered) 
in every program; Signals end of 
the program coding. 


Several commands for editing BASIC programs and for controlling 


their execution enable you to: 


Save programs on paper tape, 


etc. 


delete lines, list your program, 


load old programs from paper tape, 


B.3 COMMANDS 


The commands may be given at any time and are not preceded by a 


line number. 


Command 


DELETE n 


DELETE n,m 


LIST 
LIST n 
LIST n,m 
OLD 

RUN 


SAVE 


CTRL/P 


CTRL/U 


RUBOUT 


Action 


Delete the line with line number n, an 
alternate form is to type the line number 
and the RETURN key. 


Delete the lines with line numbers n 
through m inclusive. 


List the entire program on the teleprinter. 
List line n. 

List lines n through m inclusive. 

BASIC loads a paper tape program. 

Execute the program currently in core. 


Save the contents of user storage on 
paper tape. 


Stops a running program, prints ¢ and 
returns to command mode. 


Erases an entire input line 


Erases single character each time key is 
depressed. 


B.4 ARITHMETIC OPERATORS 


Symbol 
In BASIC 


t+™ 


Example Meaning Priority 
AtB Exponentiation First 

A , 
A*B Multiplication Sosa 
A/B Division 
A+B Addition Third 
A-B Subtraction 


A unary minus (negative number) has same priority as 
normal addition or subtraction. 


B.5 LOGICAL OPERATORS 


BASIC Mathematical BASIC 
Symbol Symbol Example Meaning 
= = A=B A equal to B 
< < A<B A less than B 
<= < A<=B A less than or equal to B 
> > A>B A greater than B 
>= > A>=B A greater than or equal to B 
<> A <> A not equal to B. 


B.6 MATHEMATICAL FUNCTIONS 


Function Meaning 

SIN (x) tcine of x (x is expressed in radians) 

COS (x) tcosine of x (x is expressed in radians) 

ATN (x) larctangent of x is returned as an angle 
in radians in range +1/2 

SQR (x) square root of x 

EXP (x) oe raised to the x power 

LOG (x) “Natural logarithm of x 

ABS (x) Absolute value of x 

INT (x) Truncate fraction part of x (truncates 
to largest integer not greater than x) 

RND (x) Generate random number between 0 and 1 

SGN (x) Sign of x (+1 for positive X; 0 for 
X=0; -l for negative x) 

FNa (x) User-defined function; a is any letter; 
used in DEF statement 

EXF (x) 


External Function (see Chapter 8) 


textended function; may be deleted during initial dialogue. 


Rte deletable. 


APPENDIX C 


ASCII CHARACTER SET 


The legal character set in BASIC is: 


BLANK (SPACE) 

A-Z 

0-9 

*f-+t+tzer>Kee., 7 ( +)": 


Any other non-CTRL ASCII character with an octal value less than 


140 is allowed between quotes in a PRINT statement. 


EVEN 7-BIT 
PARITY OCTAL 
BIT CODE CHARACTER REMARKS 
0 000 NUL NULL, TAPE FEED, CONTROL SHIFT P. 
O01 SOH START OF HEADING; ALSO SOM, START OF 
MESSAGE, CONTROL A, 
1 002 STX START OF TEXT; ALSO EOA, END OF 
ADDRESS, CONTROL B, 
0 003 ETX END OF TEXT; ALSO EOM, END OF MESSAGE, 
CONTROL C, 
1 004 EOT END OF TRANSMISSION(END): SHUTS OFF 
TWX MACHINES, CONTROL D, 
0 005 ENQ ENQUIRY (ENQRY); ALSO WRU, CONTROL E, 
0 006 ACK ACKNOWLEDGE. ALSO RU, CONTROL F. 
1 007 BEL RINGS THE BELL. CONTROL G. 
1 010 BS BACKSPACE: ALSO FEO, FORMAT EFFECTOR. 


BACKSPACE SOME MACHINES, CONTROL H. 


Oll sy HT HORIZONTAL TAB. CONTROL I. 
0 O12 |Ofo} LF LINE FEED OR LINE SPACE (NEW LINE): 
ADVANCES PAPER TO NEXT LINE, DUPLICATED 


BY CONTROL J. 


‘o) 


1 013 VT VERTICAL TAB (VTAB). CONTROL K. 
0 014 FF FORM FEED TO TOP OF NEXT PAGE (PAGE). 
ee CONTROL I. 

101s (om) cr | CARRIAGE RETURN TO BEGINNING OF LINE. 
DUPLICATED BY CONTROL M. 

1 016 SO SHIFT OUT: CHANGES RIBBON COLOR TO RED. 
CONTROL N. 

0 017 SI SHIFT IN: CHANGES RIBBON COLOR TO BLACK. 
CONTROL O. 

1 020 DLE DATA LINK ESCAPE. CONTROL P (DCO). 

0 021 DCl DEVICE CONTROL 1, TURNS TRANSMITTER 
(READER) ON, CONTROL Q (XON). 

0 022 DC2 DEVICE CONTROL 2, TURNS PUNCH OR AUXI- 
LIARY ON. CONTROL R (TAPE, AUX ON). 

1 023 DC3 DEVICE CONTROL 3, TURNS TRANSMITTER 
(READER) OFF, CONTROL S (XOFF). 

0 024 pc4 DEVICE CONTROL 4. TURNS PUNCH OR AUXI- 
LIARY OFF. CONTROL T (TAPE, AUX OFF). 

1 025 NAK NEGATIVE ACKNOWLEDGE: ALSO ERR. ERROR. 
CONTROL U. 

1 026 SYN SYNCHRONOUS IDLE (SYNC). CONTROL V. 

a ay oN 


EVEN 7-BIT 
PARITY OCTAL 
BIT CODE CHARACTER REMARKS 


© 
a) 
NO 
“J 


ETB END OF TRANSMISSION BLOCK: ALSO LEM. 
LOGICAL END OF MEDIUM. CONTROL W. 

030 CAN CAN (CANCL). CONTROL X. 

031 EM END OF MEDIUM. CONTROL Y. 

032 SUB SUBSTITUTE. CONTROL 2. 

033 ESC ESCAPE. PREFIX. CONTROL SHIFT K. 

034 FS FILE SEPARATOR. CONTROL SHIFT L. 

035 GS GROUP SEPARATOR. CONTROL SHIFT M. 

036 RS RECORD SEPARATOR. CONTROL SHIFT N. 

037 US UNIT SEPARATOR, CONTROL SHIFT O. 

040 | SP SPACE. 


ACCENT ACUTE OR APOSTROPHE. 


© © 
Ol Hoe 
U1 OV 
I ,t FH = | WN HE 


HOH OOKPOHFPOOHPHPOHOOHORPHOFPOOHPFOOFPOHRFOHPOOFOHPHFPOORRFPOHFPOOrPRFrOOrOrREFrS®S 
oo 
OV OD 
1 of 
WOdONHDNUBWNHEON? 


ome 

- 

© 
OVOBZZYrPAGQHMADMAVAAPavVV iI An~w* 


EVEN 7-BIT 
PARITY OCTAL 


BiT CODE CHARACTER REMARKS 

1 122 R 

0 123 S 

1 124 i 

0 125 U 

0 126 V 

1 127 W 

1 130 xX 

0 131 Y 

0 132 Z 

1 133 [ SHIFT K 

0 134 ‘\ SHIFT L 

1 135 ] SHIFT M 

1 136 ai SHIFT N 

, 137 e SHIFT O } See footnote 

0 140 - ACCENT GRAVE. 

0 175 THIS CODE GENERATED BY ALT MODE. 
0 176 THIS CODE GENERATED BY ESC KEY (IF PRESENT) 
1 177 DEL DELETE, RUB OUT. 


LOWER CASE ALPHABET FOLLOWS (TELETYPE 
MODEL 37 ONLY). 


1 141 a 
1 142 b 
0 143 Cc 
1 144 d 
0 145 e 
0 146 f 
1 147 g 
1 150 h 
0 151 Be 
0 152 5 
1 153 k 
0 154 1 
1 155 m 
1 156 n 
0 157 Oo 
1 160 p 
0 161 gq 
0 162 r 
1 163 S 
0 164 ics 
1 165 u 
1 166 V 
0 167 W 
0 170 x 
1 171 y 
1 172 Z 
0 173 { 
1 174 | 


On some devices, the up-arrow (+) and left-arrow (<) are replaced by 
the circumflex (*) and underline (_), respectively. 


I 


a 

‘ 
nf 

. 
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APPENDIX D 


THE BOOTSTRAP AND ABSOLUTE LOADERS 


D.1 THE BOOTSTRAP LOADER 


The Bootstrap Loader should be toggled into the highest available 


core memory bank. 


Location Instruction 
OT 

Xx7744 016701 
xx7746 000026 
xxX7750 612702 
xx7752 000352 
xx7754 005211 
xxX7756 105711 
xx7760 100376 
xX7762 116162 
xx7764 000002 
xxX7766 2347400 
xx7770 005267 
xxX7772 177756 
XxX7774 000765 
xx7776 YYYYYY 
| 111560 


xx represents the highest available core memory bank. For example, 
the first location of the Loader would be one of the following, 
depending on memory size, and xx in all subsequent locations would 


be the same as the first. 


Location Memory Bank Memory Size 
017744 0 4K 
037744 1 8K 
057744 2 

aa , 


117 20K 
137744 5 24K 
157744 6 28K 


The contents of location xx7776 (yyyyyy) in the Instruction 
column above should cohtain the device status register address of 
the paper tape reader to be used when loading the bootstrap formatted 


tape, specified as follows: 


Teletype Paper Tape Reader 177560 
High-Speed Paper Tape Reader 177550 


Set SR to xx 7744 
Press LOAD ADDR 


Verify 


or Verify 
Instructions 


Set SRto 016701 Press EXAM 
Lift DEP 


Lift DEP 
Set SR 
to correct 
Set SR to next Instruction 
Instruction 


Lift DEP 


Instruction 
Correct 
? 


All | 
instructions 
verified 


All 
Instructions 
Deposited 


° 


Yes 


Figure D-l. Loading and Verifying the Bootstrap Loader 


D.2 THE ABSOLUTE LOADER 


D.2.1 Loading the Absolute Loader 


The Bootstrap Loader is used to load the Absolute Loader into 
core (see Figure D-2). The Absolute Loader occupies locations xx7474 


through xx7743, and its starting address is xx7500. 


D.2.2 Loading with the Absolute Loader 


When using the Absolute Loader, there are three types of loads 
available: normal, relocated to specific address, and continued 


relocation (see Figure D-3). 


Optional switch register settings for the three types of loads 


are listed below: 


Switch Register 


Type of Load Bits 1-14 | Bits 0 
Normal (ignored) 0 
Relocated - continue loading where 
left off 0 1 
Relocated - load in specified area nnnnn 
of core (specified address) i 


a 


Figure D-2. 


With Bootstrap 
Loader in Core 


Set ENABLE /HALT 
To HALT 


Place Bootstrap 
Tape in 
specified reader 


Set SR to xx7744 


Prees LOAD ADOR 


Set ENABLE /HALT 
to ENABLE 


Press START 


Tape Reads in 


and stops 
At end of Data 


Data is in Core 


Code 351 must be 
over reader sensors 


41-0067 


Loading BASIC Into Core 


‘y 
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APPENDIX E 


ao OPERATING THE TELETYPE AND 


HIGH- 


SPEED PAPER TAPE READER/PUNCH 


Fi eck OPERATING THE TELETYPE 


The ASR33 Teletype is 


the basic input/output device for PDP-11 com- 


puters. It consists of a printer, keyboard, paper tape reader, 


and paper tape punch, 
under program control 


E-1) are described as 


E.1.1 Power Controls 


LINE 


OFF 


LOCAL 


all of which can be used either on-line 
or off-line. The Teletype controls (Figure 


they apply to the operation of the computer. 


The Teletype is energized and connected 
to the computer as an input/output device, 
under computer control. 


The Teletype is de-energized. 


The Teletype is energized for off-line 
operation. 


OFF 
LINE (_) LOCAL 


Figure E-l. ASR33 Teletype Console 


E.1.2 Printer 


The printer provides a typed copy of input and output at 10 


characters per second, maximum. 


E.1.3 Keyboard 
The Teletype keyboard is similar to a typewriter keyboard. How- —~\, 


ever, certain operational functions are shown on the upper part 
of some of the keytops. These functions are activated by holding 
down the CTRL key while depressing the desired key. For example, 
when using the Text Editor, CTRL/U causes Editor to ignore the 


current line of text. ‘ 


Although the left and right square brackets are not visible 
on the keyboard keytops, they are shown in Figure E-2 and are 
generated by typing SHIFT/K and SHIFT/M, respectively. The ALT 
MODE key is identified as ESC (ESCape) on some keyboards. 


OVOADVDOODD OOOO O © 
BOW OOOOO OOO @@ 
GVYVOOOODVOOOVO OO & 


Hm ODOOOOO®DOOO 


Figure E-2. ASR33 Teletype Keyboard a4 


E.1.4 Paper Tape Reader 


The paper tape reader is used to read data punched on eight-channel 
perforated paper tape at a rate of 10 characters per second maximum. 


The reader controls are shown in Figure E-1l and described below. 


START Activates the reader; reader sprocket is 
engaged and operative. 


STOP Deactivates the reader; reader sprocket 
wheel is engaged but not operative. 


FREE Deactivates the reader; reader sprocket r 
wheel is disengaged. 


The following procedure describes how to properly position paper 


tape in the low-speed reader. 


a. Raise the tape retainer cover 
b. Set reader control to FREE 


c. Position the leader portion of the tape over the read 
pens with the sprocket (feed) holes over the sprocket 
(feed) wheel and with the arrow (printed or cut) point- 
ing outward. 


d. Close the tape retainer cover; tape should move 
freely. 


e. Set reader control to STOP. 


f. Set reader control to START, and the tape will be 
read into core. 


E.1.5 Paper Tape Punch 


The paper tape punch is used to perforate eight-channel rolled 
Oiled paper tape at a maximum rate of 10 characters per second. 


The punch controls are shown in Figure E-1l and described below. 


RELease Disengages the tape to allow tape 
removal or loading. 

B.SP Backspaces the tape one space for 
each firm depression of the B.SP 
button. 

ON Activates the punch. 

OFF Deactivates the punch. 


Blank leader/trailer tape is generated by: 


1. Turning the TTY switch to LOCAL 
2. Turning the LSP on 

3. Typing the HERE IS key 

4, Turning the LSP off 

e Turning the TTY switch to LINE 


E.2 OPERATING THE HIGH-SPEED TAPE READER AND PUNCH UNITS 


A high-speed paper tape reader and punch unit is pictured in 


Figure E-3 and descriptions of the reader and punch units follow. 


E.2.1 Reader Unit 


The high-speed paper tape reader is used to read data from eight- 
channel fan-folded (non-oiled) perforated paper tape photoelectric- 
ally at a maximum rate of 300 characters per second. Primary 

power is applied to the reader when the computer POWER switch is 
turned on. The reader is under program control. However, tape 

can be advanced past the photoelectric sensors without causing 


input by pressing the reader FEED button (see Figure 1-4). 


E.2.2 Punch Unit 


The high-speed paper tape punch is used to record computer output 


on eight-channel fan-folded paper tape at a maximum rate of 50 


E-3 


characters per second. All characters are punched under program 
control from the computer. Blank tape (feed holes only, no data) 
may be produced by pressing the FEED button (see Figure E-3). 
Primary power is available to the punch when the computer POWER 


Switch is turned on. 


FEED 
READER 
aa 
(Ce}— Feeo 


PAPER TAPE OFF LINE 


Figure E-3. High-Speed Paper Tape Reader and Punch 


Paper tape is loaded into the reader as explained below. 


1. Raise tape retainer cover. 


2. Put tape into right-hand bin with channel one of the 
tape toward the rear of the bin. 


3. Place several folds of blank tape through the reader 
and into the left-hand bin. 


4. Place the tape over the reader head with feed holes 
engaged in the teeth of the sprocket wheel. 


5. Close the tape retainer cover. 
6. Depress the tape feed button until leader tape is 
over the reader head. 
CAUTION 
Oiled paper tape should not be used in the high- 


speed reader - oil collects dust and dirt which 
can cause reader errors. 


While the FEED button is depressed, the punch produces feed-hole- 


only punched tape for leader/trailer purposes. 


Ge 


INDEX 


Absolute Loader, 7-1, D-2 

ABS (X) (absolute value) 
function, 4-1, 4-6 

Addition, 2-6 

Algebraic expression in PRINT 
statement, 3-3 

Angle brackets, 1-1 

Arithmetic functions, 2-7 

Arithmetic operations, 2-5 
priority, 2-5 

Arithmetic operators, 2-6, B-3 
addition, 2-6 
division, 2-6 
exponentiation, 2- 
multiplication, 2- 
subtraction, 2-6 

Array variables, 3-18 

Arrays, 
data, 3-18 
generating, 3-19 
storage requirements, A-2 
two-dimensional, 3-21 

ASCII character set, C-l, C-2 

Assembly language programs, 8-1 

ATN(X) (arctangent) function, 4-1, 
4-3 

Available routines, 8-6 


6 
6 


Braces, 1-2 
Brackets, 
angle, 1-l 
square, 1-l 
Branches, 
conditional, 3-15 
unconditional, 3-14 
Bootstrap Loader, D-l 


Character Strings in PRINT 
statements, 3-3 
Comma in PRINT statement, 3-2 
Commands 
BASIC, 5-1 
deferred mode, A-3 
DELETE, 1-3, 5-1, 5- 
Edit and control, B- 
LIST, 5-1, 5-3 
OLD, 5-2, 5-3, A-5 
RUN, 2-3, 5-3, A-3 
SAVE, 5-2, 5-3 
Conditional branches, 3-15 
Conditional statement, 3-16 
Constants, 2-4 
Control commands, B-2, B-3 
Control variable, 3-5, 3-7 
Conversion to 
base e, 4-5 
base 10, 4-5 
radian measure, 4-2 


3 
2 


Corrections, keyboard error, 1- 


COS(X) (cosine) function, 4-1, 
4-2 
CTRL/P (control P), 5-3 
CTRL/U (control U), 1-2 
Data 
arrays, 3-18 
input, 2-4 
DATA statement, 3-8, 9-3 
Debugging user programs, 2-3 
Deferred mode, 1-2 
commands, A-3 
DEFine statement, 4-10, A-5 
DELETE command, 1-3, 5-1 
Demonstration programs, 9-1 
DIMension statement, 3-19, 9-8 
Division, 2-6 
Documentation conventions, 1-l 
Dummy variables, 4-10 


Edit commands, B-2, B-3 
Editing program, 1-3 
END statement, 2-3 
Erasing lines and programs, 5-1 
Error 
code, 6-1 


corrections, 1-2 
messages, 1-3, 6-1 
Errors, 

fatal, 6-1 


nonfatal, 6-1 
typing, 1-2 
EVAL routine, 8-3 
Evaluating expressions, 2-5, 2- 
EXF function, 8-1 
recursive calls, 8-3 
EXP (X) (exponential) function, 
4-4 
Exponential format, 2-4 


-Exponentiation, 2-6, 4-1 


Expressions, 2-5, A-4 
evaluating, 2-5 
in PRINT statements, 3-3 
External 
function (EXF), 8-1 
program, 8-2 
routine requirements, 8-3 


Fatal errors, 6-1 
Format of function call, 8-1 
Formatting printout, 3-3 
FOR-NEXT loop, 3-7, 3-15 

storage requi ement, A-2 
FOR-NEXT statement, 3-5,9-1,9-3 
FOR Statement, 3-5 

nested, 3-7 
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Function calls 
format, 8-1 
nested, 8-6 
Functions, 
arithmetic, 2-7 
extended, 4-1 
mathematical, 4-1 
user-defined, 4-10, 9-8, 
Functions, Mathematical, 
ABS (X), 4-1, 4-6 
ATN(X), 4- 
COS (X), 4- 
EXP (X), 4- 
INT(X), 4- 
LOG(X), 4- 
4- 
4- 
4- 
eo 


A-4 
4-] 


RND (X), 
SGN (X), 
SIN(X), 
SQR(X), 


=) 


Pr PH BP 
| 
m DO FR SJ OT OY BND W 


Re el el 


~ - 2 ~ ~= ~ ~ ~ 


Generating arrays, 3-19 
GOSUB statement, 3-12, 9-6 
GOTO statement, 3-14, A-3 


High-speed punch, 5-2 
High-speed tape reader and 
punch, E-3 


IF statement, 3-15 
IF-GOTO statement, 3-15 
IF-THEN statement, 3-15 
Immediate mode, 1-2, A-2 
Initial dialogue, 7-1 
long form, 7-2 
option, 7-1 
Input, data, 2-4 
INPUT statement, 
INT(X) (integer) 
9-4, 9-5 
Internal routines, 


3-11, 9-6, 
function, 


A-3 
4-1, 4-6, 


S=5 


Keyboard error corrections, 1-2 


Keyboard, Teletype, E-2 


LET statement, 
Line numbers, 
Lines, 
multiple statement, 2- 
Single statement, 2-1 
LIST statement, 5-1, A- 
Loading 

data, 1-1 

EXF program, 7-2 

and starting BASIC, 6-1 
Loader, 

Absolute, D-2 
Bootstrap, D-1l 
Logical operators, 
LOG (X) (logarithm) 
4-1, 4-5 


So, AS 
2-41 
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3-16, B-4 
function, 


Long form initial dialogue, 7-2 

Loops, 
FOR-NEXT, 3-5 
nested, 4-7, 
program, 3-5 

Low-speed punch, 


3-22 


> 


Mathematical 
functions, 4-1, 
operations, 4-1 

Messages, error, 

Mode, 
deferred, 1-2 
immediate, 1-2 

Multiple definitions, 4-12 

Multiple statement lines, 
3-15, A-4 

Multiplication, 


2) 


2-6 


Nested 
FOR statements, 
function calls, 
loops, 3-7, 3-22 
parentheses, 2-5 
subroutines, 3-13 
NEXT statement, 3-1, 
Non-fatal errors, 6-2 
Numbers, 
exponential format, 
line, 2-1 


3-7 
8-6 


3=5 


2-4 


OLD command, 5-2, A-5 
Operating Teletype, E-l 
Operations, mathematical, 
Operators, 

arithmetic, B-3 

logical, 3-16, B-4 
Option initial dialogue, 


4-] 


71 


4P, see CTRL/P 

Paper Tape Punch, E-3 

Paper Tape Reader, E-2 

Parentheses, 2-5 

nested, 2-5 

Printer, Teletype, E-1l 

Printing lines and programs, 5-1 

PRINT statement, 3-1, 9-1, A-3 
algebraic expression, 3-3 
calculations, 3-1 
character strings, 
comma, 3-2 
expressions, 3-4 
quotation marks, 
semicolon, 3-3 
Print zones, 3-2 
Priority of arithmetic operations, 
275 

Program editing, 
Program loops, 3- 
nested, 3-7 


3-3 


323 


i=3 
5 


Program size, factors affecting, 


A-2 

array, A-2 

FOR-NEXT loop, A-2 
subroutine, A-2 
user-defined function, A-2 
variable, A-2 


Programs, demonstration, 9-1 


Question marks 
data input, 2-4 
initial dialogue, 7-2 
INPUT statement, 3-11 
Quotation marks, 3-3 


Radian measure, 4-2 
conversion to, 4-2 
RANDOMIZE statement, 4-9 
Random number function, see 
RND (X) 
Random numbers, 4-7, 4-9 
READ statement, 3-8, 9-3 
Reading in a user program, 
Recursive EXF calls, 8-3 
Register RO, 8-2 
REM statements, A-4 
Requirements, 
external routine, 8-3 
user storage, A-l 
Restarting BASIC, 7-2 
RESTORE statement, 3-10 
RETURN key, 1-2, 2-1, 3-11, 


RETURN statement, 3-12, 9-12 
RND(X) (random number) function, 


4-1, 4-7, 5-3 
RUBOUT key, 1-2 
RUN command, 2-3, 5-3, A-3 


SAVE command, 5-2 
Saving user programs, 5-2 
Semicolon 

in PRINT statement, 3-3 


END, 2-3 

FOR-NEXT, 3-5, 9-1 
GOSUB, 3-12, 9-6 
GOTO, 3-14, A-3 

IF, 3-15 

IF-GOTO, 3-15 
IF-THEN, 3-15 

INPUT, 3-11, 9-6, A-3 
LET, 3-1, A-3 

LIST, 5-1, A-5 

NEXT, 3-5 

PRINT, 3-L1, 9-1L1; A=3 
RANDOMIZE, 4- 

READ, 3-8, 9- 
REMark, 2-2, 
RESTORE, 3-10 

RETURN, 3-12, 9-6 

STOP, 2-3 

THEN-GOSUB, 3-17 
Statements, B-l, B-2 
BASIC, 2-1 

conditional, 3-16 
immediate mode, A-2 
STEP use, 3-3 
STOP statement, 2-3 
Stopping a run, 5-3 
Storage overflow, A-3 
Storage requirements, A-l 
Subroutines, 3-12, A-4 
nested, 3-13 

storage requirements, A-2 


Subscripted variables, 3-18, 


Subscripts, 3-19 
order of, 3-21 
zero-filled, 3-21 

Subtraction, 2-6 


Teletype 

controls, E-lL 

keyboard, E-2 

operation, E-1l 

printer, E-l 
THEN-GOSUB statement, 3-17 


9-9 


separating text strings, 3-4 Transfer address, location 52, 8-4 
SGN(X) (sign) function, 4-1, 4-10 Typing errors, 1-2 
Single statement lines, 2-1 
SIN(X) (sine) function, 4-1, 4-2 
Special features, 1-4, A-1 Unconditional branches, 3-14 
array names, 3-18 GOTO, 3-14 


IF-THEN statement, 3-15 
immediate mode, 1-2 

multiple statement lines, 2-1 
use of RUN, LIST, DELETE, SAVE, 
OLD commands in user programs, 
5-3 

Special functions, 1-4 

SQR(X) (square root) function, 


User-defined functions, 4-10, 9-8, 
A-2, A-4 

User program commands, 5-3 

User storage requirements, A-1l, A-2 


Variable, 
array, 3-18 


4-1, 4-4 control, 3=7 
Square brackets, 1-1 dummy, 4-10 
Statement Subscripted, 3-18, 9-9 


Variables, 2-5 
storage requirement, A-2 


DATA, 3-8, 9-3 
DEFine, 4-10, A-5 
DIMension, 3-19, 9-8 
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HOW TO OBTAIN SOFTWARE INFORMATION 


Announcements of new and revised software, as well as programming notes, software problems, 
and documentation corrections are published by Software Information Service in the following 
newsletters: 


Digital Software News for the PDP-8 and PDP-12 
Digital Software News for the PDP-9/15 Family 
Digital Software News for the PDP-11 

These newsletters contain information to update the cumulative 
Software Performance Summary for the PDP-8 and PDP-12 | 
Software Performance Summary for the PDP-9/15 Family 
Software Performance Summary for the PDP-11 


The appropriate edition of the Software Performance Summary is included in each basic software 
kit for new customers. Additional copies may be requested without charge. 


Any questions or problems on the articles contained in these publications or concerning the use 
of Digital's software should be reported to the Software Specialist or Sales Engineer at the 
nearest Digital office. 


New and revised software and manuals, and current issues of the Software Performance Summary 
are available from the Program Library. To place an order, write to: 


Program Library 

Digital Equipment Corporation 
146 Main Street, Building 1-2 
Maynard, Massachusetts 01754 


When ordering, include the code number and a brief description of the program or manual 
requested. 


Digital Equipment Computer Users Society (DECUS) maintains a user library and publishes a 
catalog of available programs as well as the DECUSCOPE magazine for its members and non- 
members who request it. For further information, please write to: 


DECUS 

Digital Equipment Corporation 
146 Main Street, Building 3-5 
Maynard, Massachusetts 01754 
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READER'S COMMENTS 


Digital Equipment Corporation maintains a continuous effort to improve the quality and usefulness 
of its publications. To do this effectively we need user feedback -- your critical evaluation of 
this manual. 


Please comment on this manual's completeness, accuracy, organization, usability, and read- 
ability. 


Did you find errors in this manual? If so, specify by page. 


How can this manual be improved? 


Other comments? 


Please state your position. Date: 
Name: Organization: 
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Cilyie Ss OC FID Or COUNTY 
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